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PREFACE 



This handbook is a quick reference for commands used in 
operating the ELXSI System 6400. It is divided into the fol- 
lowing sections: 

• EMBOS commands 

• Emacs commands 

• FORTRAN commands 

• Pascal commands 

• C commands 

• ASCII character set 

Within each section, commands are listed in alphabetical or- 
der. For more detailed information on these commands and 
additional commands, consult the following publications: 

• EMBOS User's Reference Guide , Volumes 1 & 2, Order 
No. 9510 

• Emacs User's Guide, Order No. 9520 

• ELXSI FORTRAN Reference Manual, Order No. 9701 

• ELXSI Pascal User's Guide, Order No. 971 1 

• ELXSI C User's Guide, Order No. 9741 













EMBOS 


Conventions Used in this Section 



EMBOS commands are shown in lower case with capital 
letters used as word separators. For example, the command 
to check mail is shown as checkMail. EMBOS is case 
insensitive, accepting any combination of upper and lower 
case letters. 

Commands are shown in the following format: 

Command definition of function 

Syntax showing positional parameters 
Keywords and switches 

EMBOS commands in this section use symbols that should 
be interpreted as follows: 

[ ] Optional parameter entry. 

< > User-supplied entry that may vary, for example, 
<filename> 

I Logical OR. For example, 

device = tape I printer I card 
indicates that any of the following entries are valid: 
device = tape 
device = printer 
device = card 



asm 


abort aborts processes in the current job 
abort process ID 
+hardKill 

abortAII aborts all batch or timesharing jobs 
abortAII 

+timesharing +batch +hardkill 

abortjob aborts a job 
abortjob [joblDs(userlDs)] 
terminallDs = <terminallDs> 

-hhardKi 1 1 (-softKi II) +timesharing(-batch) 

abortPrint cancels a spool job 
abortPrint 
jobID = <integer> 

about shows information about a particular topic 
about subject 
+phrases 

acctID shows the account ID of the current job 
acctID 

acctLimit manages account disk space limits 
acctLimit [account] [domain] 
limit = <integer> 

+list +defaultAccount 

♦command +sum(+add, +cumulative) 

addProp adds a property to a shell variable and sets its value 
addProp varName propName value 

alias creates a permanent alias 
alias formalNames [actualNames] 
♦expand(-workingDirRelative) 

announce sends a message to al I timesharing jobs 
announce message 

arg shows the value of a shell file parameter 
arg name [index] 

asm assembles ELXSI assembly language programs 
asm 

sourceFile(src) = <pathname> 
objectFile(objfile) = <pathname> 
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asm 


listingFile(list) = <pathname> 
errorFile(errfile) = <pathname> 
summaryFile(sum) = <pathname> 

+objectFile +listingFile +errorFile 

+summaryFi!e +echo +suffix 

batch submits batch jobs 
batch [commands] 
queue =<queueName> 
maxCPU (CPUlimit) = <integer> 
homeDir = <pathname> 

CPUclass = <CPUname> 

date = <date> 

time = <time> 

title = <string> 

after = <joblDs> 

userlD = <userlD:[password]> 

accountID = <accountlD[:password]> 

logfile(jobout,$jobout) = <pathname> 

priority = realTime I timesharing I batch I background 

+restart +hiPri(-loPri) +notify 

BFedit boundfile editor 
bfedit [filename] 

+constantDump(+const) 

+instructionHexDump(+inst) 

BFinfo shows information about a boundfile 
bfinfo boundfile 
dumpFile 

+infoPage +bxt(externalRefs,extRefs) 

+debugNoP2(noP2) 

bind binds object files into a runnable program or library 
bind objectFiles 
boundFile(bfile) = <pathname> 
objectFiles(ofiles,ofs) = <pathnames> 
currentPest(pest,cpest) = <pathname> 
newPest(npest) = <pathname> 
privatePest(priPest,pPest) = <pathname> 

I ibraryPests(l ibPests, I Pests) = <pathnames> 
symbol File(sym File, sfile) = <pathname> 
summaryFile(sumfile) = <pathname> 
libraryFiles(libFiles) = <pathnames> 
errorFile(efi le,errfi le,errsfile) = <pathname> 
memoryMaptmemmap^map^emfile^file) = 
<pathname> 
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cc 



heapMax (hmax) = <integer> 
heaplnit(hinit) = <integer> 
heapReserved(hreserved) = <integer> 
stackMax(smax) = <integer> 
stacklnit(sinit) = <integer> 
mapSpace(mspace,fileMapSpace) = <integer> 
mode(bindingMode,bindMode) = priProg I newPub I 
rebind I pubLib(addPubLib) I contiguous I priPublib I 
pubProg(addPubProg) ISingu larPublib 
symFilelnfo (symlnfo) = sortByName(n) I inclPest(p) I 
sortByAddr(a) I inclTypes(t) 

+boundfile +currentPest +symbolFile 

+memorymap +errorFile +summaryFile 

+suffix +debugEntry 

+unDefsAllowed(-noUnDefs) 
+echoCommandline(echoCmdLine,cmdline) 


bye logs out 
bye 

+kill(force) 


canceljob cancels a batch job 
canceljob joblDs 

cart forms cartesian product of lists of strings 
cart stringLists 
cat concatenates strings 
cat stringLists 

cc compiles an ELXSI C program 
cc [sourceFile] [objectFile] [listingFile] [errorFile] 
[summaryFile] 

sourceFile(srcFile,sFile) = <pathname> 
objectFile(objFiIe,oFile) = <pathname> 
MstingFile(listFile,IFile) = <pathname> 
errorFile(errFile,eFile) = <pathname> 
summaryFile(sumFile,statistics,statFile) = <pathname> 


+objectFile -hi istingFi le -herrorFile 

+summaryFile -hsuffix +expand 

+code +xref +optimize 

+nonCRoutines -hi ib +warn 

+noDouble +varRO +stringRO 

+recordsForDebug 
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change 


change looks for a pattern in an input list of files and changes 

it 

change pattern substitution [changes] [first] 
changes(maximum) = <integer> 
first(start) = <integer> 
inputFiles(inFiles) = <pathnames> 
outputFiles(outFiles) = <pathnames> 

channelPri shows or sets boundfile channelPriorityMap 
channelPri boundfile 
priorities = <integers> 

checkArgs checks a shell file's command line 
checkArgs 

checkHelpFile checks format of one or more help files 
checkFtelpFile pathnames 

checkMail checks for unread mail or news 
checkMail 

clearScreen clears the terminal screen 
clearScreen 

cobol compiles ANSI 74 COBOL programs 
cobol [sourceFile] 
sourceFile = <pathname> 
listingFile = <pathname> 
objectFile = <pathname> 
summaryFile = <pathname> 

+suffix +map +optimize 

♦standard +rangeCheck +cancel 

♦summaryfile +listingFile +objectFile 

+singlequote(sq) +debugRecords 

+HewlettPackard(+HP) 

common selects or rejects lines common to two sorted files 
common filel [file2] 
delimiter = <string> 

+first +second 

♦both +exact 

compileCatalog compiles a message catalog 
compileCatalog catalogName externalVarName 

copy copies files or directories 
copy [source] [destination] 
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deleteAcct 


+subtrees +alias +merge 

+security +update 

copyANSIfiles copies ANSI-labeled files from tape to tape 
copyANSIfiles sVolume dVolume tapeFileNames 
sDevice = <pathname> 
dDevice = <pathname> 

copyTape copies one tape onto another 
copyTape sVolume dVolume 
sDevice = <pathname> 
dDevice = <pathname> 
tapeDensity = 800 I 1 600 I 6250 

count generates a list of integers 
count numberOne numberTwo increment 
increment(by,step, countBy) = <integer> 
format = <formatString> 

cpuTime shows amount of CPU time used by current job 
cpuTime 

date shows current date 
date 
+short 

debug forces a process in the current job into the Debugger 
debug process 

declare declares new shell variables 
declare varNames [value] 

+global(-local) +quiet(-verbose) 

delete deletes entries from a directory 
delete files 

inputFile = <pathname> 
rootDirectory = <pathname> 

+check +confirm +directory 

+domain +equates +hard 

♦server +tally +unformatted 

+verbose 

deleteAcct deletes an account limit on a domain 
deleteAcct [account] [domain] 



EMBOS-5 



detab 


detab expands tab characters in files 
detab [tabs] 

inputFiles(inFiles) = <pathnames> 
outputFiles(outFiles) = <pathnames> 
replaceString = <string> 
character = <character> 
increment = <integer> 

diff finds differences between two files 
diffoldFile [newFile] [output] 

output = equal I compare I script I difference 
+exactMatch(exactCompare) 

dir shows or sets current directory 
dir [directory] 

+global(-local) +insist 

disableBreak disables the BREAK key 
disableBreak 

domainOnLine checks whether a subdomain is online 
domainOnLine [pathname] 

dumpTape shows the raw data on a tape in hex and ASCII 
dumpTape 
volume = <string> 
title = <string> 

volKind = <ANSI I unlabeled> 
mount Message = <string> 
device = <pathname> 
sizeBlock = <integer> 
sFile = <integer> 
sBlock = <integer> 
files = <integer> 
blocks = <integer> 

+absolute +nodata(-data) +unload 

echo writes arguments to $stdout 
echo [stuff] 

+prompt 

ed simple line-oriented text editor 
ed [pathname] 

else introduces the "else" part of an "if statement 
else 
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equate 



emacs customizable full-screen text editor 


emacs [files] 
keysFile = <pathname> 

$termType(terminalType, termType) = <terminalType> 
$widthOfLine(widthOfLine, lineWidth) = <integer> 
$NnesPerPage(linesPerPage, length, pageLength) = 
<integer> 

+keysFile +internal +interactive 

+p rof i I e(em acs P rof i le) 


enableBreak enables the BREAK key 
enableBreak 


encryptID encrypts a string in userlD or password format 
encryptID [IDs] 

end ends shell file "if statement 
end if 


entryName extracts the last entry of a pathname 
entryName pathNames 

equate specifies or displays file equates 
equate formalFileNames [actualFileName] 
accessStrategy = sequential (default) I random 
allocationAlgorithm(algorithm) = <string> 
allocationQuantum(quantum) = <integer> 

AMmode = defaultAM I standardAM I tryOverrideAM I 
overrideAM(mustOverrideAM) 

AMname = <pathname> 
blockSize = <integer> 
creator = <userlD> 

executionLimit(execLimit) = <integer> 
initialFileSize(initialSize) = <integer> 
lockMode = autoTransaction(autoTrans) I automatic I 
manualTransaction(manualTrans) I manual 
lockKind = entityLock I physSubsetLock I 
predSubsetLock 

mapMode = default I tryToMapftryMap) I dontMap I 
map(mustMap) I rawMap 
mapT rigger = <integer> 
mapWindows = <integer> 
maxFileSize(fileSize) = <integer> 
maxRecordSize(recSize) = <integer> 
padChar = <integer> 

recordType(recFormat / format,type) = fixed(FLR) I 
VLR1 I VLR2(var) I VLR4 I unstructured 
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equate 


replacementFileName = <pathname> 
rights = defaultDataAccess I noDataAccess(none) I 
append I log(readAppend) I AMread I AMwrite I 
read I AMreadWrite(AMrw) I writeRead 
RZVuserHint = <integer> 
shareMode(sharingMode) = default I readShare I 
exclusive(noShare) I fullShare I 
writeShare(firstWriterReadShare) 
touchQuantum = <integer> 
touchT rigger = <integer> 
userHint= <integer> 
windows ize = <integer> 

+add(append) +alias 
+names 
+equates 
+ invoke AM 
+shellFile 


+global(-local) 

+binaryData 

+initialMap 

+server 

+searchesAI lowed 


+allAlias 

+scope(scopinglnfo) 

+fortranCCtl 

+mapByDefault 

+subDomains 


equates shows all defined file equations 
equates 

+scope(scopinglnfo) 

errMsg shows error message corresponding to an error 

number 

errmsg number [catalog] [firstArg] [secondArg] 
catalog = exceptionMessageCatalog(excp) I 
osMessageCatalog(operatingSystem) I 
rsMessageCatalogffileSystem, fsi) I 
UlmessageCatalog(intrinsics) I 
commandsMessageCatalog(generalCommands, 
cmd) I dbmsMessageCatalog(database) I 
binderMessageCatalog(bd) I fortranMsgCat, 
pascalMessageCatalog(epas) I 
fortranRuntimeErrmsgCatalog(fr) I 
svpMessageCatalog I profilerMessageCatalog I 
shellMessageCatalog I ethernetMessageCatalog 

eval evaluates an integer expression 
eval [expression] 

+long +hexadecimal 

example gets examples from a help file 
example subject 

exit terminates execution of a shell or shell file 
exit 
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files 


fedit edits raw information in a file in binary or ASCII 
fed it pathname 

fileExists checks whether a file exists 
fileExists sourceFile 


FileExtents shows sector extents and cylinder density info 
FileExtents [pathnames] 
cylinderSize = <integer> 

+fulllnformation (+long) 

filelnfo shows non-security attributes of namespace entry 
filelnfo [pathnames] 
inputFile 
info = < infoList > 
segmentNumber = <integer> 

infoList ::= I maxFileSize I maxRecordSize I userHint I 
recordType I AMname I padChar I executionLimit I 
blockSize I allocationQuantum I recordLabelSize I 
lockMode I lockKind I fileSize I dirtyFileSize I EOF I 
numberOfRecords I DDMname I DDsearchMode I 
replacementFilename I RZVuserHint I creatorlD I 
shellFile I binaryData I carriageControl I BOD I 
abnormalClose I crashOnLastOpen I invokeAM I 
mapByDefault I loggingEnabled I searchesAI lowed I 
hexPadCharacter I accountID I pathname I 
formalName I executionClass I DDMfilelD I 
LPinDomain I CCBinLP I pagelnCCB I lockinglnfo I 
shareMode I openMode I nameSpaceEntryType I 
serverAlive I mostlnfo I all Info 
+alias +server +subtrees 

+equates +domain +unformatted 

files shows directory contents, e.g. files and subdirectories 
files [pathnames] 

information = <infoList> 
infoList = all I size I type(kind) I endOfFile(eof) I 
modifyDate(date) I creation Date I access Date 
+files +di rectories + unformatted 

+across +after(-before) +entry(entries) 

+totals +abbreviate +middle 

+kBytes +subtrees(subdirectories) 

+paginate(pg,page) 

+absolute(-relative) 
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find 



find searches files for lines containing a pattern 
find pattern [inputFiles] [outputFiles] 
inputFiles(inFiles) = <pathnames> 
outputFiles(outFiles) = <pathnames> 
occurrences(maximum) = <integer> 
skip(ignore) = <integer> 

+exclude(x, -include) +count 

+fileNames(files) +lineNumbers(numbers) 

forget undeclares shell variables 
forget varNames 

+global(-local) +quiet(-verbose) 

forgetEquate gets rid of a file equation 
forgetEquate formalFileNames 
+global(-local) +quiet(-verbose) 

format reads arguments and formats them 
format formatstring [files(inputFiles,inFiles)] 
Arguments(Args,strings) = <arguments> 
outputFiles(outFiles) = <pathnames> 

fortran compiles FORTRAN 77 program 
fortran <program> 
src = <user specified file> 
listing = <user specified file> 
object = <user specified file> 
summary = <user specified file> 
error = cuser specified file> 
integerSize= 1 I 2 I 4 I 8 
realSize = 4 I 8 

warningLevel = < 0 through 5 > 
maxErrors = < integer > 
funcValList = <function names> 


suppress = <error number> 
opt = <0 through 1 0> 

-hsuffix +double +save 

+boundsCheck +optimize +useST 

+eval -hhol lerith +rightjust 

+noCharLen +xref +storCom 

+lrShift +f77 +f66 

+precision +symDebug +valResOp 

+inline 


freespace shows the amount of freespace in all domains 
freespace 
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goTo jumps to a label in a shell file 
goTo label 


help provides help for users in need 
help [subject] 

search(what,type,order) = commandfcmd, program) I 
subroutine (procedure, function,intrinsic) I topic I 
document I variable I file 

sections(headings) = usagel parameters I examples I 
description 

subsystem (system) = subsystem Nam e> 
+index(indices) -fhelpfiles +locations(where) 

+ phrases(keywords) +verbose(-qu iet) 


home changes current directory to user's home directory 
home 


if conditional execution in shell files 
if condition [then] 

isBoundFile determines if file is a boundFile 
isBoundFile fileName 

jobID shows jobID of current job 
jobID 

joblnfo shows full status of selected batch jobs 
joblnfo [joblDs] 

userlD(submitter) = <userlD> 
queue = <queueName> 

4-table 4-unformatted -4-all 

jobs shows status of all jobs in the system 
jobs 

4-timesharing 4-batch -4-all 

4-unformatted 

join joins multiple lines together 
join [delimiter] [numlines(lines)] 

label defines a label in a shell file 
label label 

labelTape labels magnetic tape with an ANSI-standard label 
labelTape volume 
device = <pathname> 
oldVolume = <name> 
ownerlD = <string> 
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labelTape 


density(tapeDensity) = 800 I 1600 I 6250 
readUsers = <userlDs, [:password]> 
writeUsers = <userlDs, [:password]> 

laminate laminates files and strings together 
laminate files(inputFiles,inFiles) 
strings = <strings> 
outputFile(outFile) = <pathname> 

liblnfo shows information about object file library 
liblnfo libraryName 
H-suffix 

list shows contents of files and relations 
list [pathnames] 
replaceControl = <character> 
outfile = <pathname> 
fields = <1 ist of field names> 

+inverse +unformatted +truncate 

-hSDFile +continue 

listUsers shows all users defined on the system 
listUsers 

locVar shows the value of a local-scope shell variable 
locVar name [index] 
properties = <listOfPropertyNames> 

♦properties +values 

Ips shows status of the line printers 
Ips 

♦unformatted 

mail receives mail 
mail [item] 
pattern = <pattern> 

♦index(-read) +old +news 

makeDir creates a directory entry 
makeDir pathNames 

makeFile makes an empty disk file with any structure 
makeFile pathnames [size] [maxSize] 
a I locations ize = <size> 
alternatelndices = <integer> 
blockSize = <size> 
creatorlD = <string> 
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execLimit = <integer> 
labelFieldSize = <size> 
like = <pathname> 
fields = <pathname> 
keys = <listof fields> 
segments = <integer> 

AMname(accessManager,defaultAM) = <string> 
recordSize(maxRecordSize,recsize) = <size> 
storageStructuretrecordForma^recFormat, format) = 
FLR(fixed) I VLR1 (variable”! ,var1) I 
VLR2(VLR,variable2,var,var2) I 
VLR4(variable4,var4) I unstructured 
lockingMode(lockMode) = manual I 
manualTransaction I automatic I 
transaction(automaticTransaction, 
autoTransaction) 

lockKind(lockType) = entityLock(fileLock) I 
blockLock(physicalSubsetLock,physSubsetLock, 
record Lock) 

+FORTRANcctl +binary(-ascii) 

H-shellFile +mapByDefault 

makeHelpIndex extracts keywords from Help files to make 

index 

makeHelpIndex [directory] 

+verbose(-quiet) 

makeLib makes library from object files and/or libraries 
makelib objectFiles 

libraryFiledibfileJfile) = <pathname> 
errorFi le(errfile,efile) = <pathname> 
+errorFile(errfile,efile) +suffix 

makeMailDir creates and sets security on a mail directory 
makeMailDir 

makeRestoreLog shows names of all files on a backup tape 
makeRestoreLog volumeName 
device = <pathname> 
tapeFileName = <name> 
sequenceNum = <integer> 

+di rectory +unload 

makeRZV creates a rendezvous entry 
makeRZV RZVnames 

measure measures real and CPU time to execute command 
measure commandLine 
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merge 



merge merges one or more sorted input files 
merge [inputfiles] [outputfile] 


format = fixed I variable 
reclen(recordLength) = <integer> 
key = "<keyDefinitionType>" 
collseq(collatingSequence) = ebcdic I 
oneByteSequence 
sequenceFile = <file> 
statfile(statisticsFile) = <file> 

<keyDefinitionType> = [keyStart] [keyLen] [keyType] 
[order] [sign] [+embeddedSign] 
keyStart = <integer> 
keyLen = <integer> 

keyType = nonnumeric(character) I floating(real) I 
numericUnSigned(un) I numericSigned(ns) I integer 
order = ascending I descending 
sign = leading I trailing 

+ascend i ng(-descend i ng +statfile(statisticsFile) 

modifyFile modifies non-security attributes of an entry 
modifyFile [pathnames] 
inputFile(inFile) = <pathname> 
accountlD(acctlD) = <accountlD> 
allocationQuantum(quantum) = <integer> 

AMname = <pathname> 
blockSize = <integer> 

BOD(beginningOfData) = <integer> 
creatorlD = <userlD> 

DDMname = <pathname> 
ddSearchMode = HighPerformanceSearch I 
Crash ProofSearch 
dirtyFileSize = <integer> 

EOF = <integer> 
executionLimit = <integer> 
fileSize = <integer> 

lockKind = entityLock I blockLock(recordLock) 
lockMode = transaction(autoTransaction) I automatic I 
manualTransaction(manTransaction) I manual 
maxFileSize = <integer> 
maxRecordSize(recSize) = <integer> 
numberOfRecords(numRecords) = <integer> 
padChar = <integer> 

recordType(recFormat,format,type) = VLR1 I 
VLR2(var) I VLR4 I FLR(fixed) I unstructured 
replacementFilename = <pathname> 
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parm 


RZVuserHint = <integer> 
userHint = <integer> 

+alias +case 

+equates +server 

+abnormalClose +binaryData 

+invokeAM , +subtrees 

+shellFile +truncateFile 

+crashOnLastOpen 


+domain 
+loggingEnabled 
+carriageControl 
+mapByDefault 
+searchesAI lowed 


modifyTerm modifies the configuration parameters of a 
terminal 
modifyTerm 

device = <pathname list> 
type = <terminal type> 
speed = <Baud rate> 
parity = none I odd I even I one(mark,1 ) I 
zero(space,0) 
databits = 5-8 
stopbits = 1 11 .5 I 2 
modem = cmodem type> 
like = <pathname> 
loginRetries = <integer> 

password(pswd,pw) = <terminal login password> 
+default +permanent +login 

+roff(xon) +edit +echo 

+insert +accounting +inputXOFF 

+logoutDropDTR +show 


move moves files from one place to another 
move source [destination] 


noQuote prevents a function call from quoting its output 
noQuote 

OFap appends object files 

OFap [sourceFiles] [destinationFile] 

+suffix H-stdin -4-library 

OFtrans transforms object files from old to new format 
OFtrans sourceFile destinationFile 
H-suffix +disassembly +deleteOld 

parm defines parameters for shell files 
parm name [type] 

type = integer I real I pathname I any(string,arbitrary) I 
leftovers(others) 
values = <legalValues> 
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defaults = <defaultValues> 

synonyms = <nameList> 

antonyms = <nameList> 

minimum = <number> 

maximum = <number> 

repeats = error I ignore I append I override 

+keyword +switch +positional 

+list +defaults +prompt 

+autolist +repeats +required(-optional) 

+fullName +fullValue +autoList 

+parmName +actualNames +actualValues 

+rawPositions 

pascal compiles an ELXSI Pascal program 
pascal [sourcefile] [objectFile] [listingFile] [errorFile] 
[summaryFile] 

sourceFile(srcFile,sFile) = <pathname> 

objectFile(objFile,oFile) = <pathname> 

NstingFiledistFile/lFile) = <pathname> 

errorFile(errFile,eFile) = <pathname> 

summaryFile(sumFile, statistics, statFile) = <pathname> 

infoFile = <pathname> 

fileList = <pathname> 

xrefFile = <pathname> 

maxErrors(maxErrs) = <integer> 

optimize = <integer> 

rangeCheck = none(-) I normal I paranoid(+) 
warningLevel(minWarnLevel, warnLevel) = 
none(all,default,advisory,0) I warning(l) I 
minorError(minError,2) I majorError(majError,3) I 
fatalError(4) I compilerError(5) 
io = elxsi I standard I lazy 
+objectFile +listingFile +errorFile 

+summaryFile +suffix +nilCheck 

+rangeCheck +debugRecords -infoF i le 

-fileList -xrefFile -sym Debug 

+mark -short 

+echoCommandLine(echoCmdLine,showCmdLine) 

password changes userlD password 
password 

pathname makes a full pathname from the supplied file 

name 

pathname filenames 

directory(currentDirectory,curDir) = <d i recto ryN am e> 
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pauseFor pauses for a specified number of seconds 
pauseFor seconds 


pauseUntil pauses until a specified date and time 
pauseUntil [time] [date] 

permute generates all permutations of specified strings 
permute elements 
joinString = <string> 
outFile = <pathname> 

print prints a fi le or group of fi les 
print files 

device = <pathname> 
length = <integer> 
width = <integer> 
leftHeader = <string> 
centerHeader = <string> 
rightHeader = <string> 
title = <string> 
copies(copy) = <integer> 
date = <string> 
time = <string> 

♦delete +modify +noCopy 

♦modify +noCopy +modify 

♦noCopy +foldLines +binary 

+show +unformatted(-formatted) 

+fortranCCTL(+CCTL) 

+bannerPage(+header) 

♦hiPriority(-loPriority) 


printDoc prints an online document 
printDoc documentName 
+quiet 

printers shows status of spool classes, devices, and jobs 
printers 

info = devices I jobs I all 


printlnfo shows full status of selected print jobs 
printlnfo [printjoblDs] 

profile collects performance statistics on a program 
profile command [options] 
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profilelnfo shows data collected by the profiler 
profilelnfo profileFile 


edmsFile = <pathname> 
errorfile = <pathname> 
outputFile = <pathname> 

sort = address I count I cpuPer I cumCpu I cumReal I 
cumUtil I realPer I realTime I util 
histogram = cpuPer I cumCpuPer I cumRealPer I 
realPer I util I cumUtil 
maxScale = <real> 

+actualTime +address +average 

+count +cumTime +histogram 

+percent +routineName +suffix 

+table +unused +ordinary(-scientific) 

Psemaphore performs a "P" operation on the named 

semaphore 

Psemaphore namedSemaphore [sharingMode] [count] 

punchCard punches ASCII data onto cards 
punchCard [source] destination 

qsort sorts a file in memory using entire records as keys 
qsort [inputFile(inFile)] [outputFile(outFile)] 
+reverse(+descending, -ascending) +exact 

rawArgs suppresses automatic call to checkArgs 
rawArgs 

readTape reads an unlabeled tape 
readTape pathnames 
title = <string> 
device = <pathname> 
format = unstructured I vl I v2 I v4 I fixed 
recordLength = <integer> 
position = <integer> 
conversion = parity I ebcdic I none 
executionCount = <integer> 
blockFactor = <integer> 

+binary(-ascii) +absolute(-relative) +shellFile 
+directory +executionCount +unload 

rebind fixes existing boundfile to use current pubspace 
rebind boundfile 
otherargs = <binderArguments> 
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rebindDir rebinds all boundfiles in a directory 
rebind Dir directory 
logFile = <pathname> 

+subDi rectories 



remoteLink performs remote virtual terminal connection 
and file transfer 
remoteLink device 


rename renames an entry in the name space 
rename sourceArg targetArg 
+alien +equates +hardRename 

+forwardToServer +deletelfTargetExists 

resetTerm resets a terminal to a known state 
resetTerm devices 

+hardkill(logout) +suspend(-resume) +break 

response checks for a particular response in a shell file 
response prompt [responses] 

+echo +prefix +switch 

restore restores a file or group of files from tape 
restore pathnames 
device = <pathname> 
disposition = skip I die 
incrementalRestore = <pathname> 
merge = flat 
retry log = <pathname> 
sequenceNum = <integer> 
tapeFileName = <name> 
volume = <names> 

+account +creator +delete 

+merge +security +subTrees 

+unload +workDirRelative 


resume resumes suspended processes in the current job 
resume [processes] 

rEval evaluates a real (floating point) expression 
rEval [expression] 

run controls how a command line is run 
run [commands] 

priority = realTime I timesharing I batch I background I 
sameAs Parent 

cpuClass = <cpuClassName> 
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profile = <profile parameters> 
+continue +debug 

+detached + profile 


send sends mail or news 
send [to] [subject(re)] 

+notify +registered +retract 

+addTo +hiPri(-loPri) 

set sets the value of a shell variable 
set name value 

+declare +global(-local) +add(append) 

setAcctBit controls accounting for a program 
setAcctBit boundfiles 
+doAccountingBit 

setMsg controls system message reception 
setMsg state 
state = on I off 

setSecurity modifies the security matrix of an entry 
setSecurity [pathnames] [users] [rights] 
like = <pathname> 
creator = <creatorlD> 
initialRights = minimum I default I none 
+default +alias +equates 

+server +showSecurity +$users 

+add +confirm +subtrees 

+fi les +di rectories +use Directory Default 

shell EM BOS command interpreter 
shell [command] 

+quiet(-prompt) 

shellFile makes a file executable by the shell 
shellFile fileNames 

shellTrace traces the execution of shell commands 
shellTrace 

showCPUclass shows the subclasses and CPUs in a 

CPUclass(es) 
showCPUclass [classes] 
classes = <CPUclass list> 

showSecurity shows the security matrix of an entry 
showSecurity [pathnames] [users] 


EMBOS-20 




sort 



+passwords 

+both 

+accessRights 

-♦-alias 

+directories 


-programs 

+entryRights 

+$users 

+equates 

+files 


+defaultMatrix 

+dataRights 

+server 

+subtrees 


sift sifts pathnames by various criteria 
sift [pathnames] [types] 

size(minimumSize) = <integer> 
accountID = <id> 
creatorlD = <id> 

accessedBeforeDate(before,date) = <date> 
accessedAfterDate = <date> 
modified BeforeDate = <date> 
modifiedAfterDate(after) = <date> 
created BeforeDate = <date> 
createdAfterDate = <date> 
outputFile = <pathname> 
summaryFile = <pathname> 

+fullPathname -i-subtrees +alias 

+equates +ascii(-binary) -i-domains 

-mameOnly(unformatted) 
+excludeAccountlD(+xAccountlD) 
+excludeCreatorlD(+xCreatorlD) 


slice slices out chunks of a file 
slice [startPattern] [endPattern] 
inputFiles = <pathNames> 
outputFile = <pathName> 
lines = <integer> 

+repeats(all) +excludeStart(+xStart) 
+excludeEnd(+xEnd) 


sort sorts one or more input files 
sort [inputfiles] [outputfile] 
workspace = <di rectory Names> 
format = fixed I variable 
reclen(recordLength) = <integer> 
key = "<keyDefinitionType>" 
collseq(collatingSequence) = ebcdic I 
oneByteSequence 
sequenceFile = <file> 
statfile(statisticsFile) = <file> 
treeOrder = <integer> 

<keyDefinitionType> = [keyStart] [keyLen] [keyType] 
[order] [sign] [+embeddedSign] 
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keyStart = <integer> 
keyLen = <integer> 
keyType = nonnumeric(character) I floating(real) I 
numericUnSigned(un) I numericSigned(ns) I integer 
order = ascending I descending 
sign = leading I trailing 
+ascending(-descending) 

+statf i le(statisticsF i le) 

+stable +small(-big) 


split splits input lines into multiple output lines 
split [maxLineLength(lineLength,length,recordLength)] 
status shows basic status of all processes in a job 
status 


store stores a file or group of files on tape 
store pathnames 
date = <date> 
time = <time> 
inuse = die I skip 
retrylog = <pathname> 
tryFullShare = clist of pathnames> 
device = <pathname> 
volume = <list of names> 
tapeFileName = <name> 
sequenceNum = <integer> 
blockSize = <integer> 

+subtrees +secure +sort 

+unload +alias 

strCmp compares two string arguments and write - or + 
strCmp left relation right 
+exact 

suspend suspends processes in the current job 
suspend process 

tail shows last n lines (records) of a file 
tail [numlines] [inFile] [outFile] 

tally counts characters, lines and words in a list of files 
tally [files] 

+characters +lines +words 

+printLabels(-unformatted) 

tapeFile reads or writes files on labeled tape 
tapeFile function [source] [destination] 
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■ 


tapeReply replies to a request to mount a tape 
tapeReply mountID [device] [volume] 
mountID = <integer> 
device = <pathname> 
volume = <name> 
password = <string> 

+cancel +writeProtectOverride 

+securityOverride 

tapes shows status of tape requests and tape drives 
tapes 

tar UNIX tape archiver 
tar 

key = x 1 1 1 c 

files = <pathnames> 

device = <pathname> 

+verbose 

tee duplicates input file to multiple output files 
tee [outFiles] 

inputFile = <pathname> 

terminals shows the status of a set of terminals 
terminals 

device = <pathnames> 
user = <user ID> 
state = open I closed I login 
+suspended +errors 

termlnfo shows detailed information about a terminal 
term Info 

device = <pathnames> 

info = device I user I state I suspended I speed I parity 
I databits I type I stopbits I address I errors I modem 
I login I xoff I edit I echo I insert I accounting I 
inputXOFF I logoutDropDTR I controller I AM I 
traceCount I status I log in Retries 
+unformatted 


function = read I write I files 

volume = <name> 

device = <name> 

blockSize = <integer> 

recordSize(maxRecord) = <integer> 

storage = fixed I vl I v2 I v4 I Zoned I unstructured 
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termName shows the name of the job's terminal 
termName 
+entryname 

termTypes shows all terminal types supported by EMBOS 
termtypes 

then introduces the "then" part of an if statement 
then 

time shows current time of day 
time 
+short 

timeStamp shows current date and time 
timeStamp 
+short 

to sends a message to the named user, terminal, or job 
to joblD(userName) message 
terminallD = <terminallD> 

translateCatalog translates message catalog to assembler 

program 

translateCatalog catalogName external Name 

translit transliterates characters 
translitfrom [to] 

unique eliminates duplicate lines 
unique [inputFile] [OutputFile] 
copyLimit= <integer> 
threshold = <integer> 

+count +exactMatch(exactCompare) 

unlabelTape unlabels a magnetic tape with an ANSI- 

standard label 
unlabelTape volume 

device = <pathname> 
density(tapeDensity) = 800 1 1 600 I 6250 

usage gets information from a Help file 
usage subject 

userlD shows the user ID of the current job 
userlD 
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var name [index] 


properties = <listOfPropertyNames> 
+properties +values 


vars shows all defined shell variables 
vars 

Vsemaphore performs a "V" operation on the named 
semaphore 

Vsemaphore namedSemaphore 
waitForSubDomain waits for subDomain to come online 
waitForSubDomain [pathname] 
+userCommand(-systemStartupCommand) 

+abo rtOth e rWa its 


what shows identifying strings ('what strings') in files 
what [pathnames] 
max = <integer> 
type = v I m I s I r I c I b 
+exclude +nonstandard 

whols shows information about a userlD 
whois pattern 
+exact 


writeTape writes an unlabeled tape 
writeTape pathnames 
device = <pathname> 
recordLength = <integer> 
blockFactor = <integer> 
position = <integer> 
conversion = parity I none 
tapeDensity = 800 I 1 600 I 6250 
+absolute(-relative) +binary(-ascii) 

yymmdd shows "backwards" date 
yymmdd 
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APPENDIX A: EMBOS Commands Listed by Category 


Batch Commands 


abortjob 

joblnfo 

suspendjob 

batch 

canceljob 

jobs 

resumejob 

Directory and File Commands 


alias 

equate 

list 

common 

equates 

makeDir 

copy 

fileExists 

makeFile 

diff 

filelnfo 

modifyFile 

dir 

files 

move 

ed 

forgetEquate 

pathname 

emacs 

home 

rename 

entryName 

isBoundFile 

sift 

Disk Commands 

acctLimit 

delete 

freespace 

files 

Help Commands 

about 

example 

help 

usage 

Interactive Job Commands 


abort 

monitor 

status 

acctID 

resume 

suspend 

jobID 

run 

userlD 

Mail Commands 

checkMail 

mail 

send 


Other User Communication Commands 


announce 

setMsg 

to 

Printer Commands 



abortPrint 

print 

printers 

Ips 

printDoc 

printlnfo 

Program Development Commands 


asm 

emacs 

OFtrans 

B Fed it 

errMsg 

pascal 

BFinfo 

fortran 

profile 

bind 

include 

profile Info 

cc 

liblnfo 

rebind 

channelPri 

makeLib 

rebindDir 

cobol 

measure 

run 

debug 

monitor 


ed 

OFap 
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Security Commands 

showSecurity 

password 

setSecurity 

Shell Files 

addProp 

exit 

set 

arg 

forget 

shell 

checkArgs 

goTo 

shellFile 

declare 

if 

shellTrace 

disableBreak 

label 

tee 

echo 

locVar 

then 

else 

noQuote 

var 

enableBreak 

parm 

vars 

end 

rawArgs 


errorExit 

response 


Simple Commands 

cart 

count 

reval 

cat 

eval 

permute 

Simple Filters 

change 

laminate 

tail 

copy 

merge 

tally 

detab 

qsort 

tee 

find 

slice 

translit 

format 

sort 

unique 

join 

split 


Tape Commands 

copyANSIfiles 

readTape 

tapes 

copyTape 

restore 

tar 

dumpTape 

store 

unlabelTape 

labelTape 

tapeFile 

writeTape 

makeRestoreLog 

tapeReply 


Terminal Commands 


clearScreen 

setMsg 

termName 

modifyTerm 

terminals 

termTypes 

resetTerm 

term Info 

to 

Time and Date Commands 


date 

pauseUntil 

timeStamp 

pauseFor 

time 

yymmdd 
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Conventions Used in this Section 



The syntax conventions for Emacs command entries in this 
section are illustrated in the following examples: 


A T Indicates that the CONTROL key (or CTRL) is held 
down while the T key is pressed, then both keys 
are released. 

A X T Indicates that the CONTROL key is held while the 
X key is pressed, then both keys are released. The 
T key is then pressed. 

A X A T Indicates that the CONTROL key is held while the 
X key is pressed and released then the T key is 
pressed and released. The CONTROL key is then 
released. 

This section uses the following terms: 

cursor The rectangle or underline on your screen that 
shows your position. The cursor always appears 
on or under the character immediately after dot, 
the location reference pointer. 

dot The exact point where editing takes place. Dot 
points between two characters rather than at a 
character . At the beginning of a line, dot points to 
the position before the first character. At the end of 
a line, dot points to the position after the last 
character. The cursor is always located on the 
character immediately after dot. 

mark A specific point that you can specify in a file. When 
you set the mark, you give it the current location 
of dot. Mark remains at the original setting as dot 
moves. Several Emacs commands operate on the 
area between mark and dot. 




I (MLisp) 



! (MLisp) unbound 

(! x) returns not x. If x is true, (! x) is false and vice versa. 


!= (MLisp) unbound 

(!= x y) returns true if x is not equal to y, false otherwise. 


% (MLisp) 

(% x y) returns x modulo y. 

unbound 

& (MLisp) 

(& x y) returns x and y (logical "and"). 

unbound 

* (MLisp) 

(* xy) returns x times y (multiplication). 

unbound 

+ (MLisp) 

(+ x y) returns x + y. 

unbound 

- (MLisp) 

(-xy) returns x-y. 

unbound 

/ (MLisp) 

(/ x y) returns x / y (integer division). 

unbound 

< (MLisp) 

(< x y) returns true if x less than y, false otherwise. 

unbound 

« (MLisp) 

(« x y) shifts x left by y bits. 

unbound 

<= (MLisp) 

(<= x y) returns true if x less than or equal to y, false 
otherwise. 

unbound 

= (MLisp) 

(= x y) returns true if x = y, false otherwise. 

unbound 

> (MLisp) 

(> x y) returns true if x greater than y, false otherwise. 

unbound 

>= (MLisp) 

unbound 

(>= x y) returns true if x greater than or equal to y, false 
otherwise. 

» (MLisp) 

(» x y) shifts x right by y bits. 

unbound 

1 (MLisp) 

unbound 

(1 x y) returns true if either x or y or both are true, false if x 
and y are both false (logical or). 
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A X-prefix (MLisp) A X 

Is a keymap that causes the next character typed to be inter- 
preted relative to itself. 


about [ax ?] 

Produces a list of all commands that contain the argument 
string and places it in a scratch buffer. Command comple- 
tion can be used. 

append-region-to-buffer unbound 

Appends the region between dot and mark to the named 
buffer. Neither the original text in the destination buffer nor 
the text in the region between dot and mark is disturbed. 

append-to-file A X A 

Takes the contents of the current buffer and appends it to 
the named file. If the file does not exist, it is created. 

arg (MLisp) unbound 

(arg i prompt) evaluates to the i'th argument of the invoking 
function or prompts for it if called interactively. The prompt 
is optional; if it is omitted, the MLisp function cannot be 
called interactively. 

argc (MLisp) unbound 

Returns the number of filename arguments that were 

passed to Emacs when it was invoked from the ELXSI shell. 
If either argc or argv are called early enough, 'visiting' the 
files named on the command line is suppressed. 

argument-prefix (MLisp) A U 

Causes the following string of digits to be interpreted as a 
numeric argument which is generally a repetition count for 
the following command. For example, A U10 A N moves dot 
down 10 lines. A string of n A Us followed by a command 
provides an argument to that command of 4 raised to the 
nth power. For example, A U A N moves down four lines, 
while A U A U A N moves down 16. The "argument-prefix" 
function should never be called from an MLisp function. 

argv (MLisp) unbound 

(argv n) returns the value of the nth filename argument 
passed to Emacs when it was invoked. If either argc or argv 
are called early enough, visiting the files named on the com- 
mand line is suppressed. 

auto-execute (MLisp) unbound 

Prompts for and remembers a command name and a file- 
name pattern. When a file is read via "visit-file" or "read-file" 
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backward-paragraph 



with a name matching the given pattern, the given com- 
mand executes. The command generally sets the mode for 
the buffer. Patterns must be of the form "*string" or "string*". 
For example, "*string" matches any filename with a suffix of I 
"string", and "string*" matches any filename prefixed by 
"string". The string "auto-execute c-mode *.c" puts Emacs 
into C mode for all files with the extension ".c". 

autoload (MLisp) unbound 

(autoload command file) defines a command to be automa- 
tically loaded from a named file. When an attempt to exe- 
cute the command fails, the file is loaded and the execution 
is attempted again. Autoloading is useful when you have a 
command written in MLisp, but you do not want to have the 
code loaded unless it is actually needed. 

backspace BACKSPACE 

Deletes the character to the left of dot. If Emacs is in insert 

mode, the character is removed and the rest of the line 
moves one position to the left. In "replace" mode, the char- 
acter is replaced by a blank. 

backtab SHIFT-TAB 

Moves cursor to previous tab stop. 

backward-balanced-paren-line unbound 

Moves dot backward until one of the following occurs: 

© The beginning of the buffer is reached. 

• An unmatched open parenthesis, "(", is encountered. 

• The beginning of a line is encountered at "parenthesis 
level zero". 

The definitions of parentheses and strings from the syntax 
table of the current buffer are used (see "modify-syntax- 
entry"). 

backward-character LEFT ARROW 

A B 

Moves dot backward one character. End-of-line characters 
count as one character. You cannot move backward be- 
yond the beginning of a buffer. 

backward-paragraph A X A P 

Moves dot to the beginning of the current or previous para- 
graph. Blank lines separate paragraphs and are not part of 
paragraphs. 
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backward-paren unbound 

Moves dot backward until an unmatched open parenthesis, 
T, or the beginning of the buffer is found. The definitions of 
parentheses and strings from the syntax table for the cur- 
rent buffer are used. This command is used to skip over cer- 
tain MLisp expressions. For an explanation of syntax tables, 
see "modify-syntax-entry". 

backward-sentence unbound 

Moves dot to the beginning of the current or previous 
sentence. 

backward-word A X A B 

Goes to the beginning of the word that contains dot. If dot 
is already at the beginning, it is moved to the beginning of 
the previous word. 

baud-rate (MLisp) unbound 

Returns the baud rate of the communication line to the 
terminal. 


beginning-of-file 


TOP (F3) 


A < 

Moves the cursor to the first character of the current buffer, 
beginning-of-line BOL (F2) 

A A 

Moves dot to the beginning of the current line. 

begin ning-of-window HOME 

A X 

Moves dot in front of the first character of the first line in the 
current window. 

bind-to-key unbound 

Binds a function or named macro to a specified key. For 
example, to bind the command "current-time" to the 5 key, 
enter " A X Xbind-to-key current-time 5". 

b°bp (MLisp) unbound 

(bobp) returns true if dot is at the beginning of buffer, false 
otherwise. 

bolp (MLisp) unbound 

(bolp) returns true if dot is at the beginning of a line, false 
otherwise. 

buffer-size (MLisp) unbound 

(buffer-size) returns the number of characters in the current 
buffer. 
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c= (MLisp) unbound 

(c= x y) returns true if x = y, taking into account the charac- 
ter translations indicated by "case-fold-search" and "word- 
mode-search". See Emacs User's Guide, Appendix C, 
"Variable Options", for more information. If "word-mode- 
search" is in effect, upper case letters are "c=" to their lower 
case equivalents. 

case-region-capitalize unbound 

Capitalizes all words in the region between dot and mark by 
making the initial character of each word upper case and the 
rest lower case. 

case-region-invert unbound 

Inverts the case of all alpha characters between dot and 
mark. 

case-region-lower unbound 

Changes all alpha characters between dot and mark to low- 


case-region-upper unbound 

Changes all alpha characters between dot and mark to up- 
per case. 

case-word-capitalize unbound 

Capitalizes the current word. 

case-word-invert unbound 

Inverts the case of all alpha characters in the current word. 

case-word-lower unbound 

Changes all alpha characters in the current word to lower 
case. 

case-word-upper unbound 

Changes all alpha characters in the current word to upper 
case. 

change-directory unbound 

Changes the current Emacs directory to the named directo- 
ry. All future writes and reads will be interpreted relative to 
that directory. 

char-to-string (MLisp) unbound 

Takes a numeric argument and returns a one character 
string by considering the number to be an ASCII character. 

checkpoint unbound 

Automatically saves the contents of modified buffers. 
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clean-line RUB OUT 

Erases the current line without deleting it, unless the current 
line is empty, in which case it is deleted. 


cl ear-all-tabs unbound 

Clears all tab settings. 

clear-tab SHIFT-SET TAB 

Clears the tab setting at the current cursor position. 

concat (MLisp) unbound 

Returns the concatenation of its arguments, which are 

strings. 

copy-region-to-buffer A X K 

Copies the region between dot and mark to a named buf- 
fer. The buffer is emptied before the copy is inserted, and 
the region between dot and mark is undisturbed. 

current-buffer-name (MLisp) unbound 

Returns the current buffer name as a string. 

current-column unbound 

Returns the screen column of the character following dot. 

This is not necessarily the same as the number of buffer 
characters before dot on the line, since control characters 
are displayed as multiple characters on the screen. 

current-file-name (MLisp) unbound 

Returns the filename associated with the current buffer as a 
string. If there is no associated filename, the null string is 
returned. 

current-indent unbound 

Returns the amount of whitespace at the beginning of the 
line in which dot is located. 

current-line-number unbound 

Returns the number of the line containing dot, counting 
from 1 at the beginning. 

current-time unbound 

Returns the current time of day as a string containing the 
date and time. For example, 

Monday, April 1 5, 1 985 01 :01 :01 PM PST 

declare-global unbound 

Takes a list of variables and creates a global binding for 
each variable that is not already bound. Global bindings out- 
live all function calls. 
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defaulf-global-keymap (MLisp) unbound 

Interprets the first key stroke of any Emacs command. It 
contains bindings for all the ASCII characters, both ordinary 
printing characters and control characters. 

define-buffer-macro unbound 

Defines the contents of the current buffer as a macro whose 
name is associated with the buffer. This is how you redefine 
a macro that been edited using "edit-macro". 

define-global-abbrev unbound 

Defines (or redefines) an abbreviation with the given name 
for the given phrase in the global Abbrev table. 

define-keyboard-macro unbound 

Gives a name to the current keyboard macro. The keyboard 
macro then exists only as a named macro. 

define-keymap (MLisp) unbound 

(define-keymap "mapname") defines a new empty keymap 
with the specified name. This does not cause the newly de- 
fined keymap to be the current keymap. The commands 
"use-global-map" or "use-local-map" must be called before 
"bind-to-key" or "local-bind-to-key" can be used to put en- 
tries into the new keymap. 

define-local-abbrev unbound 

Defines (or redefines) an abbreviation with the given name 
for the given phrase in the local table. A local Abbrev table 
must have already been set up with "use-abbrev-table". 

define-string-macro unbound 

Defines a macro. The name and body of the macro are en- 
tered on the bottom line. To get a control character into the 
body of the macro it must be preceded by ESC. Another 
way to define a macro is "define-keyboard-macro". 

defun (MLisp) unbound 

Defines a new MLisp function. The general format is: 

(defun 

(functionName localVariables 
(expression) 

(expression) 

)”’ 

) 

For example, to define the new Mlisp function "search-for- 
char", enter 
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(defun 

(search-for-char OldDotPos SearchChar 
(setq OldDotPos (dot)) 

(setq SearchChar (get-tty-character)) 

) 

) 

unbound 

LINE DELETE 

unbound 

DEL CHAR 
(SHIFT DEL/CHAR/INS) 

a D 

Deletes the character immediately following dot. Lines may 
be merged by deleting newlines. 

delete-next-word A X A D 

Deletes characters in front of dot to the next end of a word. 
If dot is not in a word, all punctuation to the beginning of 
the word as well as the word is deleted. 

delete-other-windows A X 1 

Returns to one-window mode. This is useful when Emacs 
generates windows automatically as with help buffers or 
"list-buffers". 

delete-previous-character unbound 

Deletes the character preceding dot. Backspace does this in 
insert mode. 

delete-previous-word A X BACKSPACE 

A X A H 

Deletes characters to the left until a word is found, then de- 
letes that word. 

delete-region-to-buffer A X A K 

Deletes all characters between dot and mark. The deleted 
text is moved to a buffer whose name is prompted for. 

delete-to-killbuffer DELETE 

(F5) 

A K 

Deletes all characters between dot and mark. The deleted 
text is moved to the kill buffer, which is emptied first. 


delete-buffer 

Deletes the named buffer. 

delete-line 

Deletes the current line. 

delete-macro 

Deletes the named macro. 

delete-next-character 
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delete-to-named-buffer unbound 

Deletes the region between dot and mark from the current 
buffer and puts it in a named buffer. The destination buffer is 
emptied before the new text is inserted. 


delete-white-space unbound 

Deletes all spaces and tabs on either side of dot. 


delete-window A X D 

Removes the current window from the screen and gives 
the space to the window above if there is one. 

describe-bindings unbound 

Displays a list of all the extended commands and the keys to 
which they are bound. 

describe-command unbound 

Displays a description of the named extended command. 
Same as the help command. 


describe-key unbound 

Shows the name of the command bound to a particular key- 
stroke sequence. 

describe-variable unbound 

Describes the named variable. A "variable" can be set with 
the set command or displayed with the print command. The 
variables are listed in Emacs User's Guide, Appendix C, 
"Variable Options". 


digit (MLisp) unbound 

The function to which the digits are bound. It usually just 
causes the digits to "put-self-in-buffer", except if they follow 
a A U since that means they represent a count. 

ding (MLisp) unbound 

Rings the bell on the terminal. 

dot unbound 

Returns the number of characters to the left of dot plus one. 


dot-is-visible (MLisp) unbound 

Returns true if the position indicated by dot is currently visi- 
ble in a window on the screen, false otherwise. 


dump-stack-trace (MLisp) unbound 

Helps debug MLisp programs by showing a trace of the call 
stack. 


edit-macro unbound 

Places the named macro in a buffer called "macro edit". The 
name of the macro is associated with the buffer and it 
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appears in the mode line of the window. The buffer may be 
edited like any other buffer. The macro can be redefined 
using "define-buffer-macro". 

edit-new-file EDIT 

If the current buffer has been modified, prompts for the 
name of a file into which the current buffer is written. The 
command then asks for the name of a new file to edit in the 
current buffer. 

emacs-version unbound 

Returns the current version number and last modification 
date of Emacs. 

encrypt-ID unbound 

Replaces the word containing dot with the result of encrypt- 
ing that word. The encrypt functions first treat the first 
twelve characters of the string to be encrypted as an Elxsi 
userlD; this is then one-way encrypted. These encryption 
functions are used to provide passwords for the system pro- 
file or configTerm commands. 

encrypt-region unbound 

Replaces the region between dot and mark with the result 
of encrypting that region. See ‘'encrypt-ID". 

encrypt-string unbound 

Returns the result of encrypting its argument. See "encrypt- 
ID". 

end-of-file BOT 

(SHIFT-F3) 

A X> 

Moves dot to just after the last character of the buffer. 

end-of-line EOL 

(SHIFT-F2) 

A Z 

Moves dot to the end of the line in the current buffer that 
contains dot, or the end of the buffer, whichever comes 
first. 

end-of-window SHIFT-HOME 

A X. 

Moves dot to just after the last character visible in the 
window. 

enlarge-window A X + 

Enlarges the current window by one line. The window be- 
low (or the one above if no window is below) becomes 
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one line shorter. Cannot be used if there is only one win- 
dow on the screen. 


eobp (MLisp) unbound m 

(eobp) returns true if dot is at the end of the buffer, false feiSsd 
otherwise. 

eol-newline-indent RETURN 

A M 

Normally executes when RETURN is hit. Dot is moved to 
the end of the current line, a newline is inserted, then dot is 
moved to the next line at the position just below the first 
non-blank character on the previous line. 

eolp (MLisp) unbound 

(eolp) returns true if dot is at the end of a line, false other- 
wise. 

erase-buffer unbound 

Deletes all text from the current buffer. Does not inquire if 
you are sure before erasing. 

erase-character-left A X A L 

Deletes the characters between dot and a specified charac- 
ter to the left of dot. 

erase-character-right A X A R 

Deletes the characters between dot and a specified charac- 
ter to the right of dot. 

erase-newline-indent LF 

A J 

Deletes characters after dot on the current line and inserts a 
newline. Dot is moved to the next line at the position under 
the first non-blank character of the previous line. 

error-message (MLisp) unbound 

(error-message "string expression") sends the specified 
"string expression" to the screen as an error message. 
Emacs then returns to keyboard level. 

error-occurred (MLisp) unbound 

(error-occurred expressions...) executes the given expres- 
sions and ignores their values. If all expressions execute 
successfully, "error-occurred" returns false. If it returns true, 
no expressions after the one that encountered the error are 
executed. 

ESC-prefix (MLisp) unbound 

Is the keymap used to process escape sequences. 
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exact-column unbound 

The number of characters in the buffer before dot on the 
current line. This may not be the same as the column on the 
screen since control characters in the buffer are displayed 
as multiple characters on the screen. See "current-column". 

exchange-dot-and-mark SHIFT-MARK 

(SHIFT-F4) 

A X A @ 

Sets dot to the currently marked position and marks the old 
dot position. This is useful for going back and forth between 
two points in a file or for checking the boundaries of a re- 
gion that is to be operated on by a command such as 
"delete-region-to-buffer". 

execute-extended-command CMD 

(SHIFT-F8) 

A XX 

Prompts for a command from the extended set. You need 
enter enough of each word in the command for the system 
to recognise the whole word and press RETURN or space 
to invoke command completion. 

execute-keyboard-macro A X A X 

Executes the keyboard macro that was defined with "start- 

remembering" and "stop-remembering". 

execute-mlisp-buffer unbound 

Parses the current buffer as a single MLisp expression and 

executes it. To test new functions, put your function defini- 
tions in a buffer and use "execute-mlisp-buffer" to define 
them. If there is more than one expression to be executed, 
surround the whole program with (progn ...). 

execute-mlisp-file unbound 

Same as "execute-mlisp-buffer", but reads the MLisp expres- 
sion from a file instead of the current buffer. 

execute-mlisp-line unbound 

Prompts for a string, parses it as an MLisp expression, and 
executes it. 

exit-emacs EXIT 

(SHIFT-F7) 

A C 

Exits the Emacs editor. You will be asked for verification if 
any file buffers have been modified but not written. 

expand-mlisp-variable unbound 

Prompts for the name of a declared variable, then inserts 
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the name as text into the current buffer. This is useful while 
entering MLisp functions. 


expand-mlisp-word unbound ■ 

Prompts for the name of a command, then inserts the name 
as text into the current buffer. This is useful while entering 
MLisp functions. 

fill-paragraph A X A J 

Fills paragraph with only one blank space between words, 
so that as many words as possible are placed on each line. 
The "right-margin" variable limits line lengths. 

filter-region unbound 

Passes the region between dot and mark as the standard 
input to the given command line. Its standard output re- 
places the region between dot and mark. 

following-char (MLisp) unbound 

(following-char) returns the character immediately after dot. 

The null character (0) is returned if dot is at the end of the 
buffer. (Dot is always between two characters.) 

forward-balanced-paren-Iine unbound 

Causes dot to move forward until one of the following 

occurs: 

• The end of the buffer is reached. 

• An unmatched close parenthesis, ")", is encountered. 

• The beginning of a line is encountered at "parentheses 
level zero". 

The definitions of parentheses and strings from the syntax 
table of the current buffer are used. See "modify-syntax- 
entry" for an explanation of syntax tables. 

forward-character RIGHT ARROW 

A F 

Moves dot forward one character. End-of-line characters 
and tabs each count as one character. It is not possible to 
move forward past the end of the buffer. 

forward-paragraph A X A N 

Moves to the end of the current or following paragraph. 
Blank lines separate paragraphs and are not part of 
paragraphs. 

forward-paren unbound 

Moves dot forward until an unmatched close parenthesis, 

")", or the end of the buffer is found. Used to skip over 
MLisp expressions. Definitions of strings and parentheses 
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from the syntax table for the current buffer are used. (See 
"modify-syntax-entry 11 for information about syntax tables.) 


forward-sentence unbound 

Moves dot to the beginning of the next sentence. 

forward-word A X A F 

Moves dot forward to the end of a word. Skips all 
intervening punctuation if not in the middle of a word, then 
skips over the word, leaving dot positioned after the last 
character of the word. 

function-keys (MLisp) ESC \ 

Is the keymap used to process function keys. For example, 
on the ELXSI 2510 the function keys generate ESC \ A 
through ESC \ P, so the function key map is bound to ESC \ 
and contains entries for characters A-P, bound to the appro- 
priate functions. 

get-tty-buffer (MLisp) unbound 

(get-tty-buffer <prompt>) prompts for the name of a buffer 
and returns it as a string. 

get-tty-character (MLisp) unbound 

(get-tty-character <prompt>) prompts for a single character 
from the terminal and returns it as an integer. The cursor re- 
mains in the text window and the character is not echoed. 

get-tty-command (MLisp) unbound 

(get-tty-command <prompt>) prompts for the name of a 
declared function and returns the name of the function as a 
string. 

get-tty-string (MLisp) unbound 

(get-tty-string <prompt>) prompts for a string which it reads 
from the terminal. 

get-tty-variable (MLisp) unbound 

(get-tty-variable <prompt>) prompts for the name of a 
declared variable and returns the name of the variable as a 
string. 

getenv (MLisp) unbound 

(getenv "<varname>") returns the named shell variable. If 
the variable contains a list of values, only the first is 
returned. 

go-to-character (MLisp) unbound 

(goto-character n) moves cursor to specified character 
position n, counting from the beginning of the buffer. 
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go-to-line-number A X A \ 

Moves cursor to the supplied line number. 

if (MLisp) unbound 

(if test thenclause elseclause) executes and returns value of 
thenclause if test is true; otherwise it executes elseclause, if 
it is present. Test, thenclause, and elseclause are expres- 
sions. If more than one expression is required, use "(progn 
...)" to surround them. 

illegal-operation (MLisp) unbound 

Is bound to keys that do not have a defined interpretation. 

Executing "illegal-operation" is an error, indicated by a beep. 

insert-blank INS CHAR 

(DEL/CHAR/INS) 

a O 

Inserts a single blank at dot. The rest of the line moves to 
the right one position. Dot does not move. 

insert-character unbound 

Inserts its numeric argument into the buffer as a single char- 
acter. For example, insert-character "7" inserts the character 
7 into the buffer. 

insert-file A X I 

Prompts for the name of a file and inserts its contents at dot 

in the current buffer. 

insert-line LINE INSERT 

Inserts an empty line above the line containing dot. The 
current line and lines below are moved down one line. Dot 
is put at the beginning of the new empty line. 

insert-string unbound 

(insert-string stringExpression) inserts the string that results 
from evaluating the given stringExpression into the current 
buffer just before dot. 

interactive (MLisp) unbound 

(interactive) returns true if the invoking MLisp function was 
invoked interactively, that is, bound to a key or from the 
minibuffer. 

is-bound (MLisp) unbound 

Returns true if all of its parameters are names of declared 

variables. 

is-IDchar (MLisp) unbound 

Returns true if its character argument is legal in ELXSI 

userlDs and passwords. 
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justify-paragraph A X J 

Fills the current paragraph and justifies both margins so that 
all lines (except possibly the last) are exactly "right-margin" 
characters long. 

kill-to-beginning-of-line A X A A 

Deletes characters from dot to the beginning of the line or 
to the beginning of the buffer if there is no previous end-of- 
line character. Deleted text is placed in the Kill buffer. 

kill-to-end-of-line LINE ERASE 

A X A Z 

Deletes characters from dot to end-of-line character, or to 
the end of the buffer if there is no end of line. If dot is at the 
end of the line, the end-of-line character is deleted. Deleted 
text is placed in the Kill buffer. 

kill-to-end-of-window PAGE ERASE 

Erases all characters from dot to the end of the window. 

last-key-struck (MLisp) unbound 

Returns the last command character struck. If you have a 
function bound to many keys, the function may use "last- 
key-struck" to tell which key was used to invoke it. For 
example, 

(insert-character (last-key-struck)) 
inserts the last key struck in the buffer, after dot. 

length (MLisp) unbound 

(length "stringExpression") returns the length of its string 
parameter. 

line-to-top-of-window AA 

Moves current line to the top of the window. 

list-buffers A X L 

Produces a listing of all existing buffers, giving their names, 
the name of any associated file, the number of characters in 
the buffer, and indicates if the buffer has been modified 
since it was read or written from the associated file. 

load unbound 

Reads the named file as a series of MLisp expressions and 

executes them. A loaded file consists primarily of "defun"s, 

buffer-specific variable assignments, and key bindings. It is 
often used to load macro libraries. The file name specified 
in the load command is interpreted relative to the EPATH 
shell variable which is interpreted similarly to the shell's 
$searchRule variable. EPATH is a list of colon-separated 
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names, that are taken to be names of directories, that are 
searched for the named files. The default value of EPATH 
searches your current directory, then /Embos/aux/emacs. If 
the file is not found, ".ml" is appended to it and the search is I 
retried. NOTE: If the first character of the loaded file is ESC, 
the file is treated as a sequence of keystrokes. 

local-bind-to-key unbound 

Prompts for the name of a command and a key, and binds 
that command to the given key. Unlike "bind-to-key", the 
binding has effect only in the current buffer. This is used for 
mode-specific bindings that differ generally from buffer to 
buffer. 

looking-at (MLisp) unbound 

(looking-at "searchstring") returns true if the given pattern 
search string matches the text that follows dot. 

make-scratch-buffer unbound 

Turns the current buffer into a scratch buffer without 
affecting its contents. 

mark (MLisp) unbound 

Returns the position of the mark in the current buffer. An 
error is signaled if the mark is not set. 

message (MLisp) unbound 

(message stringExpression) places the string that results 
from the evaluation of the given stringExpression in the mes- 
sage region at the bottom of the screen. 

minus (MLisp) unbound 

Is the function to which "-" is bound. Don't bind any key to 
this function. 

modify-syntax-entry unbound 

(modify-syntax-entry "string") modifies a set of entries in the 
syntax table associated with the current buffer. Syntax tables 
are associated with buffers by using the "use-syntax-tab le" 
command. Syntax tables are used by commands like 
"backward-paren" to do a limited form of parsing for 
language-dependent routines. They define such things as 
which characters are parts of words and which quote 
strings. 

The "modify-syntax-entry 11 parameter is a string whose first 
five characters specify the interpretation of the sixth and 
following characters. The first character specifies the type 
as follows: 
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w - Specifies a word character, as used by such commands 
as "forward-word" and "case-word-capital ize". 

space - Specifies a character with no special interpretation. 

(- Specifies a left parenthesis. Characters of this type are 
"(", "[" and "{". 

)- Specifies a right parenthesis. Characters of this type are 
")", "]" and 

"- Specifies a quote character. Usually " and 1 are defined 
this way. 

\- Specifies a prefix character, like \ in MLisp or @ in the 
shell. 

The second character is the matching parenthesis if the char- 
acter is of the left or right parenthesis type. 

The third character, if "{", indicates that the character de- 
scribed by this syntax entry begins a comment. 

The fourth character, if indicates that the character des- 
cribed by this syntax entry ends a comment. If either the 
beginning or ending comment sequence is two characters 
long, the fifth character provides the second character of 
the comment sequence. 

The sixth and following characters specify which characters 
are described by this entry. A range of characters is speci- 
fied by putting a dash (-) between them. A dash is described 
if it appears as the sixth character of the string. 

Here are a few examples: 

(mod ify-syntax-entry "w -") 

Makes hyphen (-) behave as a normal word character. 

(mod ify-syntax-entry "0 {") 

Makes left brace ({) behave as a left parenthesis which is 
matched by right brace (}). 

(mod ify-syntax-entry "){ }") 

Makes right brace (}) behave as a right parenthesis which is 
matched by left brace ({). 

move-to-comment-column unbound 

Moves the cursor to the column specified by the "comment- 
column" variable. Sets the left margin to the column speci- 
fied. If the cursor is not at the beginning of a line, it inserts 
spaces as needed. This is used in macros for language- 
specific comments. 

nargs (MLisp) unbound 

(nargs) returns the number of arguments passed in the invo- 
cation of the current MLisp function. For example, within 
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the execution of foo invoked by (foo x y), the value of nargs 
will be 2. 


newline A X A M pn 

Inserts a newline character into the buffer, splitting the cur- ■ 
rent line in two. The cursor is moved to the beginning of the 
new line. 

newline-and-backup A X a O 

Inserts an end-of-line character immediately after dot, split- 
ting the current line in two. The cursor does not move. 

newline-and-indent unbound 

Inserts a newline and inserts enough spaces so that the new 
line has the same indentation as the old one. The difference 
between this and "eol-newline-indent" (usually bound to 
RETURN) is that here the line is split if dot is not at the end of 
the line. 

next-line DOWN ARROW 

A N 

Moves dot to the next line, at the same horizontal position, 
unless the following line is shorter in which case dot is put at 
the end of that line. See the variable "track-eol-on- A N A P" for 
modification of this behavior. 

next-page PAGE 

A X A V 

Repositions the current window on the current buffer so 
that the next page of the buffer is visible in the window. A 
"page" is a group of lines slightly smaller than a window. 
"Next-page" moves you forward one page in the buffer. If 
possible, dot is kept where it is, otherwise it is moved to the 
middle of the new page. 

next-tab-pos (MLisp) unbound 

Returns the column location of the next tab position to the 
right of dot. Zero is returned if dot is at or past the last tab set- 
ting on the line. 

next-window A X N 

Switches control to the window and associated buffer that is 
below the current window. In the last window, this com- 
mand moves to the first window. 

novalue (MLisp) unbound 

(novalue) is a no-op; it performs no action and returns no 
value. Since the value of a function is generally the value of 
the last expression evaluated in its body, (novalue) can be 
used to dispose of an undesired value. 
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page-next-window A X V 

Repositions the window below the current one (or the top 
one if the current window is the lowest one on the screen) 
on the displayed buffer so that the next page of the buffer is 
visible in the window. A "page" is a group of lines slightly 
smaller than a window. "Page-next-window" moves you 
forward one page in the buffer of the other window. If A X V 
is given an argument, it moves the buffer one page back- 
ward rather than forward. 

pop-to-buffer unbound 

Switches to a named buffer and ties that buffer to a window. 
If no other window exists, one is created. This command is 
the same as "switch-to-buffer", except that "switch-to- 
buffer" ties the buffer to the current window, while "pop-to- 
buffer" ties the buffer to a different window. 

preceding-char (MLisp) unbound 

(preceding-char) returns the character that precedes dot. 
The null character (0) is returned if dot is at the beginning of 
the buffer. NOTE: Dot is "between" two characters. 

prefix-argument-loop (MLisp) unbound 

(prefix-argument-loop statements) executes statements 
prefix-argument times. Every function is always prefixed by 
an argument, usually by typing A U-n. If no prefix argument 
is provided, 1 is assumed. See "provide-prefix-argument" 
command and "prefix-argument" variable. 

prev-page-next-window A X T 

Moves the next window to the previous page. (See "page- 
next-window".) 

prev-tab-pos (MLisp) unbound 

Returns the position of the tab setting before dot on the 
current line. Zero is returned if dot is at or before the first tab 
setting on the line. 

previous-line UP ARROW 

A P 

Moves dot to the previous line, at the same horizontal 
position, unless the following line is shorter in which case 
dot is put at the end of that line. See the variable "track-eol- 
on- A N A P" for modification of this behavior. 

previous-page SHI FT-PAG E 

A X A T 

Repositions the current window on the current buffer so 
that the previous page of the buffer is visible in the window. 
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A "page" is a group of lines slightly smaller than a window. 
It moves you backward a page in the buffer. If possible, dot 
is kept where it is; otherwise it is moved to the middle of 
the new page. 

previous-window A X P 

Switches control to the window and associated buffer that is 
above the current window. 

print unbound 

Prints the value of the named variable. Use this command 
to inquire about the setting of a switch or parameter. 

progn (MLisp) unbound 

(progn expressions) evaluates the specified expressions and 
returns the value of the last expression evaluated. This func- 
tion executes several expressions when only one is al- 
lowed, for example, the "then" or "else" part of an "if 
expression. 

provide-prefix-argument (MLisp) unbound 

(provide-prefix-argument value statement) provides the spe- 
cified prefix argument value to the specified statement. For 
example, one way to skip forward eight characters is: 

(provide-prefix-argument 8 (forward-character)) 

See also the "prefix-argument-loop" command and the 
"prefix-argument" variable. 

push-back-character (MLisp) unbound 

Uses the character provided as its argument, as the next 
character read from the keyboard. This is useful in MLisp 
functions that read characters from the keyboard. When 
finding one that is not understood, it is pushed back and the 
function is terminated. The pushed-back character is read by 
the Emacs command interpreter as if it had been typed on 
the keyboard. 

put-self-in-buffer (MLisp) unbound 

Is the command to which most printing characters are 
bound, for example, letters. The character used to invoke 
"put-self- in-buffer" is put into the buffer, replacing the charac- 
ter after dot if current mode is Replace, otherwise, inserting 
the character at dot. 

query-replace-string unbound 

Asks for verification in the substitution of a matched pattern. 
Same as "re-query-replace-string". 
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quietly-read-abbrev-file unbound 

Reads and defines abbreviations appearing in a named file. 

This file should have been written using "write-abbrev-file". 
Unlike "read-abbrev-file", an error message is not printed if 
the file is not found. 

quote-character (MLisp) unbound 

Inserts the next character typed into the buffer without inter- 

preting it as a command. 

re-query-replace-string REPLACE 

(F6) 

A XQ 

Asks for verification in the substitution of a matched pattern. 
Same as "query-replace-string". 

re-replace-string SHI FT-REPLACE 

(SHIFT-F6) 

, A XG 

Replaces all occurrences of a pattern with a string. You are 
prompted for the pattern to match and the new string in the 
minibuffer. The changes are made without further interac- 
tion with the keyboard. Dot is left after the last changed 
string. This function is the same as "replace-string". 

re-search-forward SRCH-F 

(FI) 

A G 

Prompts for a pattern and searches for a match in the cur- 
rent buffer from dot to the end of the buffer. If a match is 
found, dot is left at the beginning of the matched string; if 
not, dot is unmoved. Same as "search-forward". 

re-search-reverse SRCH-B 

(SHIFT-F1) 
A X A G 

Prompts for a pattern and searches for a match in the 
current buffer, from dot to the beginning of buffer. If a 
match is found, dot is left at the beginning of the matched 
string; if not, dot is unmoved. Same as "search- reverse". 

read-abbrev-file unbound 

Reads and defines abbreviations appearing in a named file. 
The file should have been previously written using "write- 
abbrev-file". An error message prints if the file is not found. 

read-file ax r 

Prompts for a filename, then erases the contents of the cur- 
rent buffer; reads the file into the buffer and associates the 
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filename with the buffer. Dot is set to the beginning of the 
buffer. The buffer name is not changed. 


recursive-edit unbound hh 

Calls the keyboard read/interpret/execute routine. Com- WM 
mands are entered from the keyboard as usual, except that 
when you exit Emacs with "exit-emacs" ( A C), the system ac- 
tually returns from the call to "recursive-edit". This function 
is used with packages that need to enter a state, do editing, 
perform cleanup and then resume, for example, message 
composition for a mail system. 

redraw-display SCRIM (SHIFT SCRN/EDIT) 

A 

Clears the screen and rewrites it. Useful if a message has 
messed up the screen. 

redraw-minibuf (MLisp) unbound 

Forces the minibuffer to be redrawn. This is useful for a long- 
running MLisp command or program that displays mes- 
sages in the minibuffer while it runs. 

region-to-string (MLisp) unbound 

Returns the text region between dot and mark as a string. 

rename-buffer unbound 

Prompts for a new name for the current buffer. 

remove-all-local-bindings unbound 

Undoes all local bindings for all keys. Mode packages 

initialize the local binding table with this command. 

remove-all-trailing-blanks unbound 

Removes trailing blanks from all lines in the current buffer. 

remove-binding unbound 

Removes the global binding of the given key. The key is 

rebound to "illegal-operation". 

remove-local-binding unbound 

Removes the local binding of the given key. The global 

binding is then used when interpreting the key. 

remove-trailing-blanks unbound 

Removes trailing blanks from the current line. 

rename-buffer unbound 

Renames the current buffer to the value of the argument. 

The associated file name is not changed. 

replace-string unbound 

This function is the same as "re-replace-string". 
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save-excursion (MLisp) unbound 

(save-excursion expressions) evaluates the specified 
expressions and returns the value of the last expression 
evaluated. Before any expressions are executed, dot and 
the current buffer are marked. After the last expression is 
executed, dot and the current buffer are reset to the marked 
values. This command is useful in MLisp functions where 
you need to perform a task that involves moving dot and 
mark, then return to the original values. 

save-window-excursion (MLisp) unbound 

(save-window-excursion expressions) saves the current 
dot, mark, buffer and window state, executes the specified 
expressions, restores the saved information, and returns the 
value of the last expression evaluated. Though the screen is 
returned to the same buffers as before, the exact layout of 
the windows (that is, which windows are where) is not 
necessarily restored. 

scroll-one-line-down SCRL-DOWN ARROW 

A T 

Repositions the current window on the current buffer so 
that the line that is currently the second to the last line in the 
window becomes the last, moving the buffer down one line 
in the window. 

scroll-one-line-up SCRL-UP ARROW 

A V 

Repositions the current window on the current buffer so 
that the line that is currently the second line in the window 
becomes the first, moving the buffer up one line in the 
window. 

search-character-left A L 

Reads a character from the terminal, then moves dot to the 
first occurrence of that character to the left on the current 
line. If the character does not occur to the left of dot, the 
search continues from the end of the current line to dot. 

search-character-right A R 

Reads a character from the terminal, then moves dot to the 
first occurrence of that character to the right on the current 
line. If the character does not occur to the right of dot, the 
search continues from the beginning of the current line to 
dot. 

search -forward unbound 

Prompts for a pattern and searches for a match in the cur- 

rent buffer from dot to the end of the buffer. If a match is 
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found, dot is left at the beginning of the matched string; if 

not, dot is unmoved. Same as "re-search-forward". 

search-reverse unbound h 

Prompts for a pattern and searches for a match in the cur- I 
rent buffer, from dot to the beginning of buffer. If a match is 
found, dot is left at the beginning of the matched string; if 
not, dot is unmoved. Same as "re-search-reverse". 

self-insert (MLisp) unbound 

Works much like "put-self-in-buffer" except that it always in- 
serts the character, rather than following the Insert Mode or 
Replace Mode. Similar to (insert-character (last-key-struck)) 
except that "self-insert" doesn't work unless bound to a key. 

self-replace (MLisp) unbound 

Works much like "put-self-in-buffer", except that it always re- 
places the character, rather than following the Insert Mode 
or Replace Mode. 

send-mail SEND MSG 

Passes the current buffer to the send command to be sent 
as mail. The buffer must include a line beginning with "to:" 
to provide the destination of the mail. 

send-null-to-terminal (MLisp) unbound 

Sends a single null character to the terminal. This is useful 
because the null character can't be included in MLisp strings 
or variables or copied within or between buffers. 

send-string-to-terminal (MLisp) unbound 

(send-string-to-term inal "string") sends the string argument 
to the terminal with no conversion or interpretation. This 
should be used only for an application such as loading func- 
tion keys when Emacs is started. If you make a mistake, 
you will have to type SCRN or A _ to redraw the display. 

set unbound 

Prompts for the name of a variable and a value to which to 
set it. The available variables and switches are described in 
the Emacs Manual, Appendix C, "Emacs Variable Options". 

Only use Set interactively; use Setq in MLisp programs. 

set-current-file-name unbound 

Associates the supplied file name with the current buffer. 

The buffer will be changed to a "File" buffer if necessary. 

set-insert-mode INS (SHIFT-INS/REP) 

Puts the current buffer in Insert Mode. Nothing happens if 
the buffer is already in Insert Mode. 
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set-mark MARK (F4) 

A @/ A' 

Sets the mark for the current buffer at dot. Mark remains at 
the original setting as dot is moved. To move to the current- 
ly marked position, execute n exchange-dot-and-mark" 
(SHIFT-MARK). 

set-replace-mode REP (INS/REP) 

Puts the current buffer in Replace Mode. Nothing happens if 
the buffer is already in Replace Mode. 

set-tab SET TAB 

Sets a tab stop at the current cursor position. 

setq (MLisp) unbound 

Assigns a new value to a variable. For example: (setq x 8) 
sets x to 8; (setq x (concat T "o" "o")) sets x to "foo". Use 
Setq only in MLisp programs and use Set interactively. 

shell unbound 

Prompts for buffer names for $stdin, $stdout and $errout, 
and then for the command to be executed. The $stdin buffer 
is used as input for the command, and its output is placed in 
the $stdout and $errout buffers. 

shellvar unbound 

Prompts for a shell variable name and an index and returns 
the result of executing "var <varname> <index>". 

show-line-number A \ 

Writes the line number of the line containing dot in the com- 
mand line. 

show-tabs unbound 

Places "T"s in the minibuffer marking the positions of the tab 
settings. 

shrink-window A X - 

Shrinks the current window by one line; makes the win- 
dow below (or the one above if there is none below) one 
line taller. Cannot be used if only one window is on the 
screen. 

sit-for (MLisp) unbound 

(sit-for n) updates the display and pauses for n/10 second. 

Useful for displaying something for a short time and then 

going to something else. 

split-current-window A X 2 

Enters two-window mode. Splits the current window into 
two windows, dividing the space on the screen between 
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the two windows. The number of windows that can be cre- 
ated is limited only by the amount of space available on the 
screen. 

stack-dump (MLisp) unbound 

Prompts for a buffer and places the statstack from the latest 
invocation of the "shell" or "filter-region" commands in it. 



start-remembering A X ( 

Causes all following keystrokes to be remembered by 
Emacs. Used to create keyboard macros. 


stop-remembering A X ) 

Stops remembering the keystrokes initiated by A X(. The 
remembered keystrokes are executed with "execute- 
keyboard-macro", A X A X. 


string-to-char (MLisp) unbound 

(string-to-character "string") returns the integer value of the 
first character of the string argument. 

substr (MLisp) unbound 

(substr string position n) returns the substring of the speci- 
fied string, starting at the specified position (numbering 
from 1) and running for n characters. If the specified posi- 
tion or n is less than 0, the length of the string is added to 
the negative number. For example: 

(substr "bork" 3 2) returns "rk" 

(substr "crawk" -2 3) returns "awk". 


switch-to-buffer A X B 

Prompts for the name of a buffer and associates it with the 
current window. The old buffer loses its association; it is not 
erased. If the new buffer does not exist, it is created. 

system-name (MLisp) unbound 

Returns "ELXSI". 


tab 

Moves cursor to next tab stop. 


TAB 

A l 


tab-to-column unbound 

Moves the cursor to the specified column, inserting spaces 
only if necessary. 


temp-use-buffer (MLisp) unbound 

Switches to a named buffer, but does not change window 
associations. Unlike "pop-to-buffer" and "switch-to-buffer", 
it does not cause a window to be tied to the selected buffer. 
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"temp-use-buffer" is ineffective when used from the key- 
board, because the keyboard command driver requires that 
the current buffer be tied to the current window. You may 
need to use "save-excursion" to remember your position if 
you use "temp-use-buffer 11 to move between buffers. 

test-abbrev-expand unbound 

Prompts for an abbreviation, and shows the phrase to which 
that abbreviation will be expanded. 

to-col unbound 

(to-col n) inserts spaces so that the following character is 
moved to column n. 

toggle-insert-mode A E 

Switches from Insert Mode to Replace Mode and vice 
versa. 

transpose-characters unbound 

Exchanges the positions of the two characters preceding 
dot. This is useful if bound to a key. 

tutorial unbound 

Runs the emacs tutorial which teaches basic emacs editing 
concepts and commands. 

use-abbrev-table unbound 

Sets the current local Abbrev table to the one with the given 
name. Local Abbrev tables are buffer specific and are usual- 
ly set depending on the major mode. Several buffers may 
have the same local Abbrev table. This command turns on 
Abbrev Mode if either the selected local Abbrev table or the 
global Abbrev table has had some abbreviations defined in 
them. 

use-global-map unbound 

(use-global-map "mapname") uses the named map for the 
global interpretation of all keystrokes. 

use-local-map unbound 

(use-local-map "mapname") uses the named map for the 
local interpretation of all keystrokes. 

use-old-buffer A X O 

Prompts for the name of the buffer and associates it with the 
current window. The current buffer is not erased; it merely 
loses its association with the current window. The buffer 
specified must already exist, unlike "switch-to-buffer". 
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use-syntax-table unbound 

Causes the named syntax table to be associated with the 
current buffer. Refer to "modify-syntax-entry" for more 
information on syntax tables. 

users-login-name (MLisp) unbound 

Returns the user's login name as a string. 


visit-file A X E 

Prompts for the name of a file and switches to the buffer 
that contains it. If no buffer contains the file, switches to a 
new buffer and reads the file into it. The name of the new 
buffer will be the last part of the filename (everything after 
the last T in the name). If there is already a buffer with that 
name, and it contains some other file, prompts: 

Enter a new buffer name or <CR> to overwrite the old 

buffer 

This command is the best way to switch between files. 
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TIP and Emacs Control Sequence Summary 



A letter 

A X- A letter 

A X-letter 

a 

beginning of 

erase to beginning 

append to file 


line * 

of line* 

b 

backward cursor * 

backward word* 

switch to buffer 

c 

exit emacs 
*TIP: end of file 



d 

delete next 
character* 

delete next word* 

delete window 

e 

Insert Mode 
toggle 


edit file (visit) 

f 

cursor forward * 

forward one word * 

write fi le & exit 

g 

search forward 

search backward 

replace matched 

for pattern 

for pattern 

pattern 

h 

delete previous 

delete previous 



character * 

word* 


i 

tab 

backtab 

insert file 

j 

(lf)erase to EOL, 

fill paragraph 

justify 


newline* 


paragraph 

k 

delete to Kill 

delete to named 

copy to named 
buffer 


buffer 

buffer 

1 

search charcter 

delete character 

list buffers 


left* 

left* 


m 

(cr) newline and 

split line and 

write modified files 


indent* 

newline* 


n 

next line 
(cursor down)* 

next paragraph 

next window 

o 

open space 
(insert blank)* 

split line 

use old buffer 

P 

previous line 

previous 

previous window 


(cursor up) * 

paragraph 


q 

TIP only: XON 
resume output * 


query replace 

r 

search character 

delete character 

read file 


right* 

right 


s 

TIP only: XOFF 
suspend output* 


save current file 

t 

scroll down 

previous page 

previous page- 


one line 


next window 

u 

argument prefix 



V 

scroll up 

next page 

next page- 


one line 


next window 

w 

yank from Kill 
buffer 

yank from named 
buffer 

write named file 

X 

execute 

execute keyboard 

execute extended 


A X command* 

macro 

command 

y 

abort operation 
pattern 

abort operation 
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TIP and Emacs Control Sequence Summary 



z end of line 
TIP: end of line* 

set mark 

@ ( A space on GD 
\ show line number 

A line to top of 
window 

_ ( A del) refresh 
TIP uses A X! 


erase to end of 
line* 



* functions available in the TIP 


Miscellaneous A X-character commands 

, top of window . end of window 

< beginning of file > end of file 

? apropos (help) ! refresh screen (TIP only) 

( start remembering ) stop remembering 

1 delete all windows but one 2 spl it current window into 2 
+ enlarge window - shrink window 

: execute shell command line 
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FORTRAN 




Conventions Used in this Section 


Entries are shown in the form: 

DEFINED TERM definition of term 
Syntax 

defined-subterm defintion of subterm 

The syntax used to describe ELXSI FORTRAN is referred to 
as a metalanguage and is based on Backus-Naur Form. 

Uppercase notation indicates words that must be entered as 
shown (letter sequence). FORTRAN is case insensitive. This 
is used for keywords and specifiers. For example, the key- 
words PAUSE and LOGICAL are shown in uppercase, as 
are the specifiers UNIT and SEQUENTIAL. 

Words and letters in lowercase show user-supplied entries. 
For example, "CALL subroutine-name" shows the syntax for 
the FORTRAN statement CALL followed by a subroutine 
name. "CALL ROGUE" is valid if ROGUE is a subroutine. 

Character strings in quotation marks, ", must be typed as 
shown, but without the quotation marks. This notation indi- 
cates necessary punctuation; for example, "(", or ")". 

Vertical bars, I, separate alternative choices of which only 
one is to be coded. For example, 

SEQUENTIAL I DIRECT 

specifies to code either SEQUENTIAL or DIRECT. 

Parentheses, ( ), group alternative choices into statements. 
For example, 

(UNIT "=" unit-id) I (FILE "=" path-name) 
indicates a choice of UNIT "=" unit-id or FILE "=" path-name. 
Brackets, [ ], enclose optional items. For example, 

BLOCK DATA [block-name] 

shows that a block name may be coded, but is not required. 

Braces, { }, enclose optional items that can be coded more 
than once. They provide a simple way to specify that multi- 
ple items must be separated by punctuation. For example, 
EXTERNAL proc-name { "," proc-name } 

shows that multiple proc-name entries must be separated 
by commas. If only one proc-name is coded, do not enter a 
comma. 

Blanks are included to enhance readability and have no 
significance. 




BLOCK DATA 


ACCEPT reads formatted sequential data. 

ACCEPT (format-id I format-expr) ["," io-list] 
or 

* ACCEPT * io-list] 

format-id specifies the statement label of the FORMAT 
statement used for data editing. 

format-expr is a character expression providing the for- 
mat information. 

* io-list is a simple list element or implied DO list. 

ASSIGN associates a statement label with an integer or log- 
ical variable. 

ASSIGN source TO target 

target is an INTEGERM, INTEGERS, LOGICALM, or 
LOGICAL*8 variable. 

source is a statement label in the same program unit as 
the ASSIGN statement. 

Assign an expression to an arithmetic, logical, or character 
variable. 

target "=" source 

target is either a variable or an array element, 
source is an expression. 

BACKSPACE repositions an open file over the preceding 
record. 

BACKSPACE T [UNIT "="] unit-id 

["," ERR "=" error-label] 

* ["," IOSTAT"=" io-status] ")" 
unit-id is an external unit identifier. 

error-label is the label on the statement to which control 
is transferred if an error occurs. 

io-status is an integer variable or integer array element 

* where the io-status code resulting from the backspacing 
operation is stored. 

BLOCK DATA begins a BLOCK DATA subprogram. 

BLOCK DATA [block-name] 

block-name is the symbolic name of the block-data 
subprogram. 
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BYTE 


BYTE specifies a BYTE data type. 

BYTE name [ "(" dim-decl ")" ] {/clist/} 

{ V 1 name [ T dim-decl V ] {/clist/} } 
name is the name of a symbolic constant, variable, array, 
function, or dummy procedure being specified. 

dim-decl is a dimension declarator that specifies the 
bounds for an array name and has the syntax: 

[dim-lower-bound dim-upper-bound 

dim-lower-bound is the lower bound of the dimension. 
If omitted, "1" is assumed. 

dim-upper-bound is the upper bound of the dimension. 

clist is a list of constants that initializes the name declared 
before it. 

CALL causes a specified subroutine to be executed. 

CALL subroutine-name 

["(" [ actual-arg [actual-arg]} ] ")"] 
subroutine-name is the name of the called subroutine. 

actual-arg is an actual argument for the called subpro- 
gram, or nothing, indicating a zero argument. 

CHARACTER specifies a character data type. 

CHARACTER ["*" length [","] ] 

name ["(" dim-decl ")"] {/clist/} 

{"," name ["(" dim-decl ")"] {/clist} } 
or 

CHARACTER name ["(" dim-decl ")"] length {/clist/} 

{"," name ["(" dim-decl ")"] 
length {/clist/} } 

length is the length, measured as a character count, for 
each named symbolic constant, variable, array element, 
or function result. The length must be coded as a positive 
integer constant, a positive-valued integer constant ex- 
pression, or a parenthesized asterisk, "(*)". 

name is the name of a symbolic constant, variable, array, 
function, or dummy procedure whose type is being 
specified. 

dim-decl is a dimension declarator that specifies the 
bounds for an array name and has the Syntax: 
[dim-lower-bound M : n ] dim-upper-bound 
dim-lower-bound is the lower bound of the dimension. 
If omitted, "1" is assumed. 

dim-upper-bound is the upper bound of the dimension. 
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COMMON 


clist is a list of constants that initializes the name declared 
before it. 


CLOSE disconnects the specified file from its I/O unit. 

CLOSE T [ UNIT "="] unit-id 

ERR "=" error-label] 

IOSTAT "=" io-status] 

["," (STATUS I DISP I DISPOSITION) 
"=" file-dispos] ")" 

unit-id is an external unit identifier. 


error-label is the label on the statement to which control 
is transferred if an error occurs during the close. 

io-status is an integer variable or integer array element 
that stores the io-status code resulting from the closing 
operation. 

file-dispos is a character expression that specifies the dis- 
position of the file after its closing. The character expres- 
sion must have the value, ignoring trailing blanks, equal 
to 'KEEP 1 , 'DELETE', or 'NOTAPEMOTION'. 

Omission of this specifier for a file with a status of 
'SCRATCH' prior to execution of the CLOSE statement 
has the same effect as specifying a file status of 'DELETE'; 
otherwise, the effect is the same as specifying 'KEEP'. 

A status of 'NOTAPEMOTION' is used for reading or 
writing multiple files on tape. If 'NOTAPEMOTION' is 
specified, the tape does not move when the file is closed. 
Otherwise, the tape is rewound and unloaded. 


COMMON groups variables into contiguous storage. 
COMMON ["/' [block-name] "/'] name ["(" dim-decl ")"] 

{"," name ["("dim-decl ")"]} 

{ [","] "/" [block-name] 
name ["(" dim-decl ")"] 

{"," name ["(" dim-decl ")"]} } 

block-name is the name of the common block. 

name is the name of the variable or array to be contained 

in the common block. 


dim-decl is a dimension declarator that specifies the 
bounds for an array name and has the syntax: 

[dim-lower-bound ":"] dim-upper-bound 

dim-lower-bound is the lower bound of the dimension. 
If om itted, "1 " is assumed. 

dim-upper-bound is the upper bound of the dimension. 
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COMPLEX 


COMPLEX specifies complex arithmetic data. 

COMPLEX ["*" length [","] ] 

name ["(" dim-decl ")"] (/clist/J 
{"," name ["(" dim-decl ")"] {/clist /} } 
or 

COMPLEX name ["(" dim-decl M ) M ] "*" length {/clist/} 

name ["(" dim-decl ")"] length {/clist/} } 

length is the length, measured as a byte count, for each 
named symbolic constant, variable, array element, or 
function result. The length must be coded as either a 
positive integer constant, or a positive-valued integer con- 
stant expression whose value is 4, 8, or 1 6. 

name is the name of a symbolic constant, variable, array, 
function, or dummy procedure whose type is being 
specified. 

dim-decl is a dimension declarator that specifies the 
bounds for an array name and has the Syntax: 
[dim-lower-bound dim-upper-bound 
dim-lower-bound is the lower bound of the dimension. 

If om itted, "1 " is assumed. 

dim-upper-bound is the upper bound of the dimension. 

clist is a list of constants that initializes the name declared 
before it. 

CONTINUE has no effect on program execution. 

CONTINUE 

DATA initializes names to values coded. 

DATA (entity-name I do-list) {"," (entity-name I do-list)} 

T [repeat "*"] const {"," [repeat "*"] const} 

{ [","] (entity-name I do-list) 

{"," (entity-name I do-list)} 

7' [repeat "*"] const {"," [repeat "*"] const} '7' } 

entity-name is the name of a variable, array, array ele- 
ment, or substring (but not a function result variable or a 
dummy argument) that is to be initialized, 
do-list is an implied DO list that has the syntax: 

"(" (entity-name I do-list) {"," (entity-name I do-list)} 
control-var "=" initial-expr final-expr 
["," increm-expr] ")" 

control-var is the name of an integer variable, known 
as the "control variable". 
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DIMENSION 


initial-expr is an integer expression that specifies the ini- 
tial value assigned to the control variable. 

final-expr is an integer expression that specifies the fi- 
nal value assigned to the control variable. 

increm-expr is an integer expression that specifies the 
increment used to produce successive values assigned 
to the control variable. 

repeat is a repetition factor for the following constant, 
const is a constant or the symbolic name of a constant. 

DECODE translates character data to binary form according 
to the FORMAT specifier. 

DECODE "(" length (format-id I format-expr) 

7 char-id IOSTAT "=" io-status] 

ERR "=" error-label] ")" [io-list] 

length is an integer expression whose value is the record 
length, in bytes, to be processed. 

format-id specifies the statement label of the FORMAT 
statement used for data editing. 

format-expr is a character expression providing the for- 
mat information. 

char-id is the name of the variable, character substring, 
array, or array element name that contains the characters 
to be translated. 

io-status is an integer variable or integer array element 
where the io-status code resulting from the attempted 
data transfer operation is stored. 

error-label is the label on the statement to which control 
is transferred if an error occurs. 

io-list is one or more simple variables and/or implied DO 
lists. 

DIMENSION specifies upper and lower bounds of an 
array. 

DIMENSION name "(" dim-decl {"," dim-decl) ")" 

{"," name "(" dim-decl dim-decl} ")" } 

name is the name of an array whose dimensions are be- 
ing specified. 

dim-decl is a dimension declarator that specifies the 
bounds for an array name and has the syntax: 
[dim-lower-bound dim-upper-bound 
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DIMENSION 


dim-lower-bound is the lower bound of the dimension. 

If omitted, "1" is assumed. 

dim-upper-bound is the upper bound of the dimension. 

DO executes a range of statements a specified number of 
times. 

DO [final-label] control-var 

"=" initial-expr final-expr increm-expr] 

final-label is the label, if specified, of the final statement in 
the loop. The label must appear on a statement following 
the DO statement. 

control-var is the name of a noncomplex arithmetic vari- 
able, known as the control variable or DO variable, 
initial-expr is a noncomplex arithmetic expression specify- 
ing the initial value assigned to the control variable. 

final-expr is a noncomplex arithmetic expression specify- 
ing the final value assigned to the control variable. 

increm-expr is a noncomplex arithmetic expression speci- 
fying the increment used to produce successive values 
assigned to the control variable. 

DOUBLE COMPLEX specifies a double-precision complex 
data type. 

DOUBLE COMPLEX name ["(" dim-decl ")"] {/clist/} 

{"," name ["(" dim-decl ")"] {/clist/} } 
name is the name of a symbolic constant, variable, array, 
function, or dummy procedure whose type is being 
specified. 

dim-decl is a dimension declarator that specifies the 
bounds for an array name and has the syntax: 

[dim-lower-bound dim-upper-bound 

dim-lower-bound is the lower bound of the dimension. 
If omitted, "1" is assumed. 

dim-upper-bound is the upper bound of the dimension. 

clist is a list of constants that initializes the name declared 
before it. 

DOUBLE PRECISION specifies a double-precision real data 
type. 

DOUBLE PRECISION name ["(" dim-decl ")"] 

{"," name IT dim-decl 7']} 

name is the name of a symbolic constant, variable, array, 
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ENCODE 


function, or dummy procedure whose type is being 
specified. 

dim-decl is a dimension declarator that specifies the 
bounds for an array name and has the syntax: 

[dim-lower-bound ":"] dim-upper-bound 

dim-lower-bound is the lower bound of the dimension. 
If omitted, "1 " is assumed. 

dim-upper-bound is the upper bound of the dimension. 

DO WHILE executes a range of statetments while a condi- 
tion is true. 

DO [final-label] [","] WHILE logical-expr 
final-label is the label of the final statement in the loop. 
The label must appear on a statement that follows the 
DO WHILE statement. 

logical-expr is a logical expression that, as long as it is 
true, causes execution of the statements between the 
DO WHILE statement and the final-label. 

ELSE causes a block of statements in a block IF statement to 
be executed if the IF condition is false. 

ELSE 

ELSE IF evaluates a logical expression and may execute 
code. 

ELSE IF V expr ")" THEN 
expr is a logical expression. 

ENCODE translates list elements to character data accord- 
ing to the FORMAT specifier. 

ENCODE "(" length (format-id I format-expr) 
char-id ["," IOSTAT "=" io-status] 

[ M , M ERR "=" error-label] V [io-list] 

length is an integer expression whose value is the record 
length, in bytes, to be processed. 

format-id specifies the statement label of the FORMAT 
statement used for data editing. 

format-expr is a character expression providing the for- 
mat information. 

char-id is the name of the variable, character substring, ar- 
ray, or array element that will receive the characters after 
encoding. 

io-status is an integer variable or integer array element 
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ENCODE 


where the io-status code resulting from the attempted 
data transfer operation is stored. 

error-label is the label on the statement to which control 
is transferred if an error occurs. 

io-list is one or more simple variables and/or implied DO 
lists. 

END indicates end of a program. 

END 

END DO indicates the end of a DO loop. 

END DO 

END FILE writes an end-of-file record to a specified I/O unit. 

END FILET unit-id ")" 

or 

END FILE T [UNIT "=*'] unit-id [V ERR "=" error-label] 
IOSTAT "=" io-status] ")" 
unit-id is an external unit identifier. 

error-label is the label on the statement to which control 
is transferred if an error occurs. 

io-status is an integer variable or integer array element 
where the io-status code resulting from the END FILE op- 
eration is stored. 

END IF terminates a block IF. 

END IF 

ENTRY provides an alternate entry point for a subroutine or 
function subprogram. 

ENTRY entry-name ["(" [dummy-arg dummy-arg] ")"] 

entry-name is the symbolic name for the alternate entry 
point to this subprogram. 

dummy-arg is a dummy argument for the subprogram. 
EQUIVALENCE specifies storage sharing. 

EQUIVALENCE "(" entity-name entity-name 
entity-name] ")" 

"(" entity-name entity-name 
{"," entity-name] ")" } 

entity-name is the name of a variable, array, array ele- 
ment, or substring, but not a function result variable or a 
dummy argument. 
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FUNCTION 


EXTERNAL identifies an external, programmer-written 
procedure. 

EXTERNAL proc-name proc-name} 

proc-name is the name of an external procedure, a dum- 
my procedure, or a block data subprogram, but not a 
statement function name. 

FIND places a direct-access file prior to a specified record. 

FIND V [UNIT "="] unit-id ["," [REC H = n | ] rec-num 

["," IOSTAT "=" io-status] 

["," ERR "=" error-label] T 

unit-id is an integer expression with a value between 0 
and 255, that refers to a valid I/O device. The "UNIT =" is 
optional only if this is the first of the specifiers. 

rec-num is a positive, non-zero, integer expression that 
specifies the number of the record to be read or written in 
the file. The value of rec-num must be less than or equal 
to the number of records in the file, plus one. 

error-label is the label on the statement to which control 
is transferred if an error occurs. The statement label must 
be in the same program unit as the FIND statement. 

io-status is an integer variable or integer array element 
where the io-status code resulting from the attempted 
data transfer operation is stored. 

FORMAT specifies I/O editing. 

FORMAT "("format-item {"," format-item) ")" 

format-item is either an edit descriptor with optional repe- 
tition factor or a format specification with optional repeti- 
tion factor. 

FUNCTION specifies the primary entry point to a FUNC- 
TION subprogram. 

[type] FUNCTION function-name 

["(" [dummy-arg {"," dummy-arg}] ")"] 
type is the data type for the function result. 

function-name is the symbolic name for the primary entry 
point to this function. This is the name by which the func- 
tion is known to other program units and the name of the 
local variable used as the function result. 

dummy-arg is a dummy argument for the function. A dum- 
my argument must be a variable name, an array name, or 
a dummy procedure name. 
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GOTO 


GO TO transfers control to a specified label. 

Syntax for unconditional GOTO statement: 

GOTO label 

label is the statement label to which control is uncondi- 
tionally transferred. 

Syntax for computed GOTO statement: 

GOTO "("label {"," label} ")" [","] selector 

label is the statement label to which control is conditional- 
ly transferred. 

selector is an integer expression that selects one of the 
statement labels coded in the parenthesized list. 

Syntax for assigned GOTO statement: 

GOTO selector [ [ ,, / n ] "(" label {"," label} ")"] 

selector is an integer or logical variable that contains the 
result from execution of an ASSIGN statement in the 
same program unit. 

label is a statement label to which control is conditionally 
transferred. 

IF specifies conditional execution. 

Syntax for arithmetic IF: 

IF "(" arith-expr ")" neg-label "," zero-label pos-label 

arith-expr is an arithmetic expression that selects one of 
the statement labels coded in the unparenthesized list. 

neg-label is the statement label to which control is trans- 
ferred if the value of the arithmetic expression is less than 
zero. 

zero-label is the statement label to which control is trans- 
ferred if the value of the arithmetic expression is equal to 
zero. 

pos-label is the statement label to which control is trans- 
ferred if the value of the arithmetic expression is greater 
than zero. 

Syntax for logical IF: 

IF "(" logical-expr ")" statement 

logical-expr is a logical expression that determines wheth- 
er the coded statement is executed or skipped. 

statement is a statement executed if the value of the logi- 
cal expression is true. The statement can be any state- 
ment except a block IF, DO, ELSE, ELSE IF, END, END IF, 
or another logical IF statement. 
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INQUIRE 



Syntax of a block IF statement: 

IF "(" logical-expr ")" THEN 
if-block 

{ELSE IF "("logical-expr T THEN 
else-if-block} 

{ELSE 

else-block} 

END IF 

logical-expr is a logical expression that determines if the 
following block of statements is executed or skipped. 

if-block is the block of statements executed depending on 
the outcome of the logical-expr within the IF statement, 
else-if-block is the block of statements executed depend- 
ing on the outcome of the logical-expr following the ELSE 
IF statement. 

else-block is the block of statements executed depending 
on the outcome of the logical-expr following the ELSE 
statement. 

IMPLICIT overrides default data types. 

IMPLICIT type "("letter I (letter"-" letter) 

{"," letter I (letter "-" letter)) ")" 

{"," type "(" letter I (letter "-" letter) 

{"," letter I (letter "-" letter)} ")" } } 

type is a scalar data type. 

letter is one of the characters allowed as the first charac- 
ter of a FORTRAN variable name. 

INCLUDE includes portions of a program during 
compilation. 

INCLUDE {pathname} [">" NOLIST l">" LIST] " 1 " 

pathname is the pathname of the file included. 

INQUIRE provides information about a file. 

INQUIRE "("([UNIT "="] unit-id I FILE "=" pathname) 
return-specifier "=" value] 

{"," return-specifier "=" value} ")" 

unit-id is the logical unit to be queried. 

pathname is the pathname of the file to be queried. 

return-specifier is any specifier in Table 1 . 

value is the value returned by the INQUIRE statement. 


■ 
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Table 1 . INQUIRE Statement Return Specifiers 


SPECIFIER 

FUNCTION 

RETURN VALUE 

ACCESS 

access mode 

SEQUENTIAL 

DIRECT 

undefined 

BLANK 

blank 

interpretation 

NULL 

ZERO 

undefined 

DIRECT 

direct access 
allowed 

YES 

NO 

UNKNOWN 

ERR 

error label 

not applicable 

EXIST 

file existence 

.TRUE. 

.FALSE. 

FORM 

record format 

FORMATTED 

UNFORMATTED 

undefined 

FORMATTED 

formatted 

records 

allowed 

YES 

NO 

UNKNOWN 

IOSTAT 

status code 
specifier 

processor-ass igned 
integer 

NAME 

filename being 
inquired about 

name of file 
undefined 

NAMED 

file named 
status 

.TRUE. 

.FALSE. 

NEXTREC 

current 

record 

integer number 
of next record 

NUMBER 

logical unit 

integer number 
undefined 

OPENED 

file or unit 
open status 

.TRUE. 

.FALSE. 

RECL 

record length 

integer number 
undefined 

SEQUENTIAL 

sequential 
access allowed 

YES 

NO 

UNKNOWN 

UNFORMATTED 

unformatted 
records allowed 

YES 

NO 

UNKNOWN 
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INTEGER specifies an integer arithmetic type. 

INTEGER ["*" length ] name 
["(" dim-decl ")"] {/clist/} 

name ["(" dim-decl ")"] {/clist/} } 
or 

INTEGER name ["(" dim-decl ")"] 
length {/clist/} 

{"," name ["(" dim-decl M ) n ] length {/clist/} } 

length is the length, measured as a byte count, of the 
storage occupied by each named symbolic constant, vari- 
able, array element, or function result. The length must 
be coded as either an integer constant or an integer con- 
stant expression and have a value of 1 , 2, 4, or 8. 

name is the name of a symbolic constant, variable, array, 
function, or dummy procedure whose type is being 
specified. 

dim-decl is a dimension declarator that specifies the 
bounds for an array name and has the syntax : 

[dim-lower-bound dim-upper-bound 
dim-lower-bound is the lower bound of the dimension. 
If omitted, "1" is assumed. 

dim-upper-bound is the upper bound of the dimension, 
clist is a list of constants that intializes the name declared 
before it. 

INTRINSIC specifies an intrinsic function used as an argu- 
ment to another subprogram. 

INTRINSIC func-name {"," func-name} 
func-name is the name of an intrinsic function. 

LOGICAL specifies a logical data type. 

LOGICAL ["*" length ] 

name ["(" dim-decl ")"] {/clist/} 

{"," name ["(" dim-decl ")"] {/clist/} } 
or 

LOGICAL name ["(" dim-decl ")"] 
length {/clist/} 

{"," name ["(" dim-decl ")"] length {/clist/} } 

length is the length, measured as a byte count, of the 
storage occupied by each named symbolic constant, 
variable, array element, or function result. The length 
must be coded as either an integer constant or an integer 
constant expression and have a value of 1 , 2, 4, or 8. 
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LOGICAL 


name is the name of a symbolic constant, variable, array, 
function, or dummy procedure whose type is being 
specified. 

dim-decl is a dimension declarator that specifies the 
bounds for an array name and has the syntax : 

[dim-lower-bound dim-upper-bound 

dim-lower-bound is the lower bound for the dimen- 
sion. If omitted, "1" is assumed. 

dim-upper-bound is the upper bound for the dimension. 

clist is a list of constants that initializes the name declared 
before it. 

NAMELIST associates variables with a group name that is 
used by a list-directed I/O statement. 

NAMELIST "/'group-name 1 '/" io-list 
{"/' group-name "/' io-list} 
group-name is the name of a list. 

io-list is the list identified by the group-name. A list may 
contain one or more variables, an array, or array element 
name. Items in the list must be separated by commas. 
Each list of items is associated with the name 
immediately preceding the list. 

OPEN opens a file. 

OPENT [UNIT "="] unit-id 

{"," specifier "=" value } {"," specifier} ")" 

unit-id is an integer expression with a value between 0 
and 255, that refers to a valid I/O device. 

specifier is a specifier shown in Table 2 or 3. 

value is one of the specifier's values as shown in Table 2. 
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Table 2. Summary of OPEN Statement Specifiers, Format 1 


SPECIFIER 

FUNCTION 

VALID VALUE 

DEFAULT 

ACCESS 

access 

SEQUENTIAL 

SEQUENTIAL 


mode 

DIRECT 


BLANK 

interp. 

NULL 

NULL 


of blanks 

ZERO 


BLOCKSIZE 

physical 

integer 

system 

or BLCKSZ 

blocksize 

expression 

default 

ERR 

error transfer 

statement 




label 

label 


FILE or NAME 

pathname 

character 

expression 

— 

FORM 

format 

FORMATTED 

FORMATTED 


type 

UNFORMATTED for sequential 




UNFORMATTED 
for direct 

FS$FILE 

file descriptor 

file descriptor 

— 

IOSTAT 

I/O status 

integer variable 




or array element 


MAPTRIGGER 

page-map 

integer 

system 


table length 

expression 

determined 

NAME 

(See FILE) 



RECORDSIZE 

record length 

integer 

as specified 

orRECL 

creation 

expression 

at file 

RELBEHIND 

page write 

integer 

system 

or RELEASE- 
BEHD 

length 

expression 

determined 

STATUS or 

file status 

'UNKNOWN' 

'UNKNOWN' 

TYPE 


'SCRATCH' 

■NEW' 

'OLD' 


TOUCH- 

memory 

integer 

system 

AHEAD or 

transfer 

expression 

determined 

TOUCHAHD 

length 


TOUCH- 

memory 

integer 

system 

TRIGGER 

transfer 

expression 

determined 

or 

freq'cy 



TOUCHTRGGR 



TYPE 

(See STATUS) 



UNIT 

logical unit no. 

integer expression 


WINDOW- 

regions 

integer 

system 

COUNT 

to view 

expression 

determined 

WINDOW- 

region 

integer 

system 

SIZE 

size 

expression 

determined 
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Table 3. Summary of OPEN Statement Specifiers, Format 2 


SPECIFIERS 

FUNCTION 

DEFAULT 

SHARED 

READSHARE 

DEFAULTSHARE 

share mode 

DEFAULTSHARE 

READONLY 

access mode 

READWRITE- 

APPENDONLY 

READAPPEND 

WRITEONLY 


DATAACCESS 

READWRITEDATAACCESS 


DONTMAP 

NOTES: 

prevents default 
mapping 

' 


• The specifiers SHARED, READSHARE, and DEFAULTSHARE are 
mutually exclusive. 

* The specifiers READONLY, APPENDONLY, READAPPEND, 
WRITEONLY, and READWRITEDATAACCESS are mutually 
exclusive. 
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READ 


PARAMETER specifies constants with values. 

Syntax for FORTRAN-standard statement in which the 
data type of the parameter is determined by the implicit or 
explicit type of the name. 

PARAMETER "(" name "=" const-expr 

{"," name "=" const-expr} ")" 

Syntax for ELXSI-extended statement in which the data 
type of the parameter is determined by the data type of 
the const-expr: 

PARAMETER name "=" const-expr 

name "=" const-expr} 

name is the symbolic name given to the constant. 

const-expr is the constant value named, in the form of a 
constant expression. 

PAUSE suspends program execution. 

PAUSE [pause-code] 

pause-code is a pause-identifying code. The code must 
be an integer expression or a character expression. 

PRINT writes data to default output. 

PRINT (format-id I format-expr I "*") io-list] 

format-id specifies the statement label of the FORMAT 
statement used for data editing, or for automatic 

editing. 

format-expr is a character expression providing the for- 
mat information. 

io-list is a simple list element or implied DO list. 

PROGRAM identifies main program. 

PROGRAM program-name 

program-name is the symbolic name of the main 
program. 

READ reads data. 

Syntax for sequential formatted read: 

READ T [UNIT"="] unit-id 

["," [FMT "="] (format-id I format-expr) ] 

["/' IOSTAT "=" io-status] 

["," ERR "=" error-label] 

["," END eof- label] T [io-list] 

or 

READ (format-id I format-expr) ["," io-list] 
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READ 


Syntax for formatted sequential list-directed read: 

READ "(" [UNIT "=“] unit-id 
["," [FMT "="]"*"] 

IOSTAT "=" io-status] 

["," ERR "=" error-label] 

END "=" eof- label] ")" [io-list] 
or 

READ * io-list] 

Syntax for NAMELIST read: 

READ"(" [UNIT "="] unit-id 

["," [NML"="] namelist-name] 

["," IOSTAT "=" io-status] 

["," ERR "=" error-label] 

["," END "=" eof-label] ")" 

Syntax for sequential unformatted read: 

READT [UNIT "="] unit-id 

["," IOSTAT "=" io-status] 

["," ERR "=" error-label] 

["," END "=" eof-label] ")" [io-list] 

Syntax for direct-access formatted read: 

READT [UNIT "="] unit-id 

(REC "=" I ) rec-num 

["," [FMT "="] (format-id I format-expr) ] 
["/'IOSTAT "=" io-status] 

["," ERR "=" error-label] ")" [io-list] 

Syntax for direct-access unformatted read: 

READ V [UNIT "="] unit-id REC "=" rec-num 
["," IOSTAT "=" io-status] 

["," ERR "=" error-label] ")" [io-list] 
or 

READ "(" unit-id rec-num 

["," IOSTAT "=" io-status] 

["," ERR "=" error-label] ")" [io-list] 

Syntax for internal file: 

READ T [UNIT "="] character-id 

["," [FMT "="] (format-id I format-expr) ] 

["," IOSTAT "=" io-status] 

["," ERR “=" error-label] 

["," END "=" eof-label] ")" [io-list] 

unit-id is an integer expression with a value between 0 
and 255, that refers to a valid I/O device. This value can 
be an asterisk (*) specifying default input. 
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REAL 



format-id specifies the statement label of the FORMAT 
statement used for data editing. 


format-expr is a character expression providing the for- 
mat information. 

io-status is an integer variable or integer array element 
where the io-status code resulting from the attempted 
data transfer operation is stored. 

error-label is the label on the statement to which control 
is transferred if an error occurs. 

eof-label is the label on the statement to which control is 
transferred when an end-of-file is detected. 

io-list is one or more simple variables and/or implied DO 
lists. 

namelist-name is the name of a previously defined list in a 
NAMELIST statement. 

rec-num is a positive integer expression that specifies the 
number of the record to be read from the file, 
character-id is the name of a character variable, character 
array, character array element, or character substring. 


REAL identifes a real arithmetic data type. 

REAL ["*" length [","] ] name ["(" dim-decl ")"] {/clist/} 

{'V name ["(" dim-decl T] {/clist/} } 
or 

REAL name ["(" dim-decl ")"] length {/clist/} 

{"," name ["(" dim-decl ")"] length {/clist/} } 

length is the length, measured as a byte count, of the stor- 
age occupied by each named symbolic constant, 
variable, array element, or function result. The length 
must be coded as either an integer constant or an integer 
constant expression and have a value of 4, 8, or 1 6. 

name is the name of a symbolic constant, variable, array, 
function, or dummy procedure whose type is being 
specified. 

dim-decl is a dimension declarator that specifies the 
bounds for an array name and has the syntax : 

[dim-lower-bound dim-upper-bound 
dim-lower-bound is the lower bound of the dimension. 
If omitted, '1 1 is assumed. 

dim-upper-bound is the upper bound of the dimension, 
clist is a list of constants that intializes the name declared 
before it. 
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RETURN 


RETURN returns control from a subprogram to a main 
program. 

Syntax for a function subprogram: 

RETURN 

Syntax for a subroutine subprogram: 

RETURN [alternate-return] 

alternate-return is an alternate- return code, specified 
only in a subroutine subprogram. This integer expression 
selects one of the asterisks ("*") in the dummy argument 
list. 

REWIND returns to beginning of file. 

REWIND V [UNIT "="] unit-id 

["," ERR "=" error-label] 

P'," IOSTAT "=" io-status] V 
unit-id is an external unit identifier. 

error-label is the label on the statement to which control 
is transferred if an error occurs. 

io-status is an integer variable or integer array element 
where the io-status code resulting from the REWIND 
operation is stored. 

SAVE specifies names to remain defined until the next invo- 
cation or across calls. 

SAVE [ (name I V block-name "/") 

(name I "/" block-name "/') } ] 

name is the name of a variable or array whose value is 
saved. 

block-name is the name of a common block whose value 
is saved. 

STATEMENT FUNCTION statement allows a programmer 
to define a function that is evaluated when the function is 
referenced. 

Syntax for statement function: 
function-name "(" [dummy-arg dummy-arg}] ")" 
result-expr 

function-name is the symbolic name for the statement 
function. 

dummy-arg is a dummy argument for the function. A dum- 
my argument for a statement function must be a variable 
name. 

result-expr is an expression that is the result of the state- 
ment function. 


FORTRAN - 20 




WRITE 



Syntax for reference: 

function-name "(" [actual-arg actual-arg}] ")" 
function-name is the symbolic name of the statement 
function. 


actual-arg is a actual argument for the function. An actual 
argument for a statement function may be an expression. 

STOP terminates execution of a program. 

STOP [stop-code] 

stop-code is a stop-identifying code. The code must be an 
integer expression or a character expression. 



SUBROUTINE provides a primary entry point for a subrou- 
tine. 


SUBROUTINE subroutine-name 

["(" [dummy-arg dummy-arg}] ")"] 

subroutine-name is the symbolic name of the primary en- 
try point to this subroutine. This is the name by which the 
subroutine is known to other program units. 

dummy-arg is a dummy argument for the subroutine. A 
dummy argument must be a variable name, an array 
name, or an asterisk ("*"). 


TYPE writes data to default output. 

TYPE ( (format-id I format-expr) I * ) ["," io-list] 

format-id specifies the statement label of the FORMAT 

statement used for data editing. 

format-expr is a character expression providing the for- 
mat information. 

io-list is a simple list element or implied DO list. 

WRITE writes data. 

Syntax for sequential formatted write: 

WRITE T [UNIT "='■] unit-id 

["," [FMT "="] (format-id I format-expr) ] 

["," IOSTAT"=" io-status] 

[m m ERR ..—i' error-label] T [io-list] 

Syntax for sequential list-directed write: 

WRITE V [U N IT "="] unit-id 
["," [FMT"= n ] "*"] 

IOSTAT "=" io-status] 

ERR "=" error-label] ")" [io-list] 

Syntax for NAMELIST write: 

WRITE "(" [U N IT "="] unit-id 

[NML"="] namelist-name 
["," IOSTAT io-status] 

["," ERR "=" error-label] ")" 
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WRITE 



Syntax for sequential unformatted write: 

WRITE T [UNIT "="] unit-id 

["," IOSTAT "=" io-status] 

["," ERR "=" error-label] ")" [io-list] 

Syntax for direct-access formatted write: 

WRITE T [UNIT "="] unit-id 

V (REC "=" I " 1 ") rec-num 

["," [FMT "="] (format-id I format-expr) ] 

["," IOSTAT "=" io-status] 

["," ERR .. = .. error-label] ")" 

Syntax for internal write: 

WRITE T [ UNIT "=" ] character-id 

[" , " [FMT "="] (format-id I format-expr)] 

[ IOSTAT io-status] 

[ ,, / H ERR "=" error-label] ")" [io-list] 

unit-id is an integer expression with a value between 0 
and 255, that refers to a valid I/O device. This value can 
be an asterisk (*) specifying default input. 

format-id specifies the statement label of the FORMAT 
statement used for data editing. 

format-expr is a character expression providing the 
format information. 

io-status is an integer variable or integer array element 
where the io-status code resulting from the attempted 
data transfer operation is stored. 

error-label is the label on the statement to which control 
is transferred if an error occurs. 

io-list is one or more simple variables and/or implied DO 
lists. 

namelist-name is the name of a previously defined list in a 
NAMELIST statement. 

rec-num is a positive integer expression that specifies the 
number of the record to be written into the file. 

character-id is the name of a character variable, character 
array, character array element, or character substring. 
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Pascal 



Conventions Used in this Section 


This section uses a metalanguage based on Backus-Naur 
Form (BNF) to show the syntax of ELXSI Pascal program- 
ming statements. This list defines the metalanguage used in 
this section for syntax definitions. 

Reserved words are shown in bold face and must be typed 
as shown. They are case insensitive. 

Italic type signifies ELXSI extensions. 

Words to the left of an equal sign (=) are nonterminal sym- 
bols of the grammar. A nonterminal symbol is defined by 
more basic (terminal) symbols of the language. Phrases that 
describe nonterminal symbols appear as compound words. 
For example, 

tag-field = identifier . 

The vertical bar means "or" and separates alternatives within 
a grammar rule. For example, 
switch = "+" I . 

means that a switch is defined as a plus OR a minus sign. 

Parentheses enclose a series of alternatives when the series 
comprises only part of the definition. For example, 
identifier = (letter I "$") {letter I "$" I digit I . 
means that an identifier is defined as a letter or dollar sign, 
optionally followed by any number of letters, dollar signs, 
digits, and underscores. 

Square brackets enclose optional parts of a definition. For 
example, 

command = filename [parameters] 

means that a command is defined as a filename, optionally 
followed by parameters. 

Curly braces enclose parts of a definition that can be re- 
peated any number of times, including zero. For example, 
digits = digit {digit} . 

means that digits is defined as a digit followed by zero or 
more digits. 

Character strings between double quotes (") are typed as 
shown, but without the double quotes. In the example, 
vertical-bar = "I" 

the vertical bar on the right side is interpreted as a literal 
character, not as an "or" symbol. 





program = {option} program identifier 

[program-parameters] block"." 


program-parameters = "(" identifier-list ")" 
identifier-list = identifier {"," identifier} 

block = declaration-part compound-statement 

declaration-part = {declaration} 

declaration = option I function-declaration I 

procedure-declaration I type-declaration I 
constant-declaration I var-declaration I 
own-declaration I label-declaration 

option = "{" "$" option-letter [option-parameter] "}" 

option-letter = "B" I "E" I "L" I "P" I "W" 
option-parameter = "+" I I integer I string 

function-declaration = 

function identifier [formal-parameters] ":" identifier 
block ";" 

function identifier [formal-parameters] identifier ";" 
directive ";" 

function identifier";" block";" 
procedure-declaration = 

procedure identifier [forma I -parameters] block 
procedure identifier [formal-parameters] directive ";" 
procedure identifier ";" block ";" 
directive = "forward" I "extern" 

formal-parameters = "(" formal-parameter-section 

{";" formal-parameter-section} ")" 

formal-parameter-section = identifier-list identifier I 
var identifier-list":" identifier I 
procedure identifier [formal-parameters] I 
function identifier [formal-parameters] identifier 



type-declaration = type type-definition-list ";" 
type-definition-list = type-definition {";" type-definition} 
type-definition = identifier "=" type 

type = identifier I constant constant I "(" identifier-list ")" I 
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" A " identifier I [packed] file of type I 
[packed] set of type I 

[packed I machine] array 11 [" type type) "]" of type 
I [packed I machine] record [field-list] end 

field-list = 

fixed-part [";"] I fixed-part variant-part I variant-part 
fixed-part = field-declaration field-declaration) 

field-declaration = identifier-list":" type [at constant] 

[use constant] 

variant-part = "case discriminator of variant- list 

discriminator = identifier I identifier":" identifier [at constant] 
[use constant] 

variant-list = variant {";" variant) [";"] 
variant = constant-list ":" "(" field-list ")" 
constant-declaration = const constant-definition-list ";" 

constant-definition-list = constant-definition 

{";" constant-definition) 

constant-definition = identifer identifier] "=" initializer 
var-declaration = var var-definition-list; 
var-definition-list = [option] var-definition {";" var-definition) 
var-definition = identifier-list ":" type [":=" initializer] 
own-declaration = own own-definition-list 

own-definition-list = [option] own-definition 
{";" own-definition) 

own-definition = identifier-list ":" type initializer] 

[align constant] 

label-declaration = label label {"," label) 
label = integer 

initializer = basic-initializer I "(" basic-initializer-list ")" 

basic-initializer-list = basic-intializer "," basic-initializer 
{"," basic-initializer) 

basic-initializer = expression I expression of initializer 
constant-list = constant {"," constant) 
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constant = expression 

statement-list = statement statement} 

statement = [label basic-statement 

basic-statement = assignment-statement I goto-statement I 
procedure-call I if-statement I 
while-statement I repeat-statement I 
for-statement I with-statement I 
case-statement I compound-statement I 
empty-statement 

assignment-statement = variable expression 
goto-statement = goto label 
procedure-call = identifier [parameter-list] 

if-statement = if expression then statement I 

if expression then statement else statement 

while-statement = while expression do statement 

repeat-statement = repeat statement- list until expression 

for-statement = for identifier expression direction 
expression do expression 
direction = to I downto 
with-statement = with variable do statement 
case-statement = case expression of cases end 

cases = case-list [otherwise statement] 

case-list = case case} 

case = constant {, constant} statement 

compound-statement = begin statement- list end 

empty-statement = 

expression = basic-expression 

[relational-operator basic-expression] 

relational-operator = "<" I ">" I "<>" I "<=" I ">=" I in 

basic-expression = term [adding-operator term} I 
V term I"-" term 



adding-operator = "+" I I or I "I" I "&&" 
term = factor [multip lying-operator factor] 
multiplying-operator = I "/' I mod I div I and I "&' 
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ELXSI extensions 


factor = integer I real-number I hex-number I 

longreal-number I string I nil I variable I 
identifier "(" expression-list ")" I "(" expression ")" I 
not factor I set-denoter 

expression-list = expression expression} 

set-denoter = 11 [" set-denotation- list "]" 

set-denotation-list = set-denotation {'V' set-denotation} 
set-denotation = expression I expression expression 

parameter-list = parameter parameter} 

parameter = expression I expression expression I 
expression expression expression 


The following keywords are ELXSI extensions: 

align otherwise 

at own 

machine use 

The following operators are ELXSI extensions: 

1 1 1 Not ital icized in the text to avoid confusion with 

The appearances of 'option' are ELXSI extensions. 

The optional identifier in constant-defintion is an ELXSI ex- 
tension as are the optional ':=' initializer in var-definitions. 
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Lexicon 


The following are defintions of the lexicon of the ELXSI im- 
plementaion of Pascal. 

adding-operator = "+" I I "or" I "I" I "&&" 

comment = "{" a-sequence-of-characters-that-does-not- 
include-a-right-brace "}" 

digit = M 0" I "1 " I "2" I "3" I "4" I "5" I "6" I "7" I "8" I "9" 


digits = digit {digit} 

dquote = 11 " " (two single quotes) 

exponent = ["+" I digits 

hexadecimal-digit = digit I "A" I "B" I "C" I "D" I "P I "F" I "a" I 
"b" I "c" I "d" I "e" I T 



hexadecimal-digit-sequence = hexadecimal-digit 

{hexadecimal-digit} 

hex-number = "1 6" "#" hexadecimal-digit-sequence ["#"] 
integer = digits 

identifier = (letter 11 1 "$") {letter 11 1 "$" I digit I "_"} 


label = digits 

letter = "a" I "b" I "c" I "d" I "e" I T I n g" I M h" I "i" I "j" I "k" I "I" I 
"m" I "n" I "o" I "p" I "q" I V I "s" I V I "u" I V I "w" I 
"x" I "y 11 1 "z" I M A" I "B" I "C" I "D" I "E" I "F" I "G" I "H" I 
T I "J" I "K" I "L" I "M" I "N M I "O" I "P" I "Q 11 1 "R" I "S" I 
'T' I "U" I "V" I "W" I "X" I "Y" I "Z" 


long-real-number = digits digits] ("D" I "d") exponent 
quote = 

real-number = digits digits I 

digits [". ,l digits ("E" l"e") exponent] 

string = quote {string-character I dquote} quote 

string-character = any-character-except-quote 
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Conventions Used in this Section 


In the syntax notation used in this section, syntactic catego- 
ries are in regular type, and literal words and characters are 
in bold type. Alternative categories are listed on separate 
lines. 

The subscript opt denotes an optional terminal or nontermi- 
nal symbol so that 
{expression opt } 

indicates an optional expression enclosed in braces. 

Italic type signifies ELXSI extensions. 




Expressions 


The basic expressions are: 

expression: 

primary 

* expression 
& expression 

- expression 
! expression 
~ expression 
++ lvalue 

— lvalue 
lvalue ++ 
lvalue — 

sizeof expression 
( type-name ) expression 
expression binop expression 
expression ? expression : expression 
lvalue asgnop expression 
expression , expression 

primary: 

identifier 

constant 

string 

(expression ) 

primary ( expression-1 ist opt ) 
primary [ expression ] 
lvalue . identifier 
primary -> identifier 

lvalue: 

identifier 

primary [ expression ] 
lvalue . identifer 
primary -> identifier 

* expression 
( lvalue) 

The primary-expression operators 
0 □ . -> 

have highest priority and group left-to-right. 



The unary operators 
*&-!-++ — sizeof (type-name) 

have priority below the primary operators but higher than 
any binary operator, and group right-to-left. 
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Expressions 


Binary operators and the conditional operator group left-to- 
right, and have priority decreasing as indicated: 
binop: 

* / % 

+ - 

» « 

<><=>= 

& 

A 

I 

&& 

II 

?: 

Assignment operators have the same priority, and group 
right-to-left: 

asgnop: 

= += -= *= /= %= »= «= &= A = 1 = 

The comma operator has the lowest priority, and groups 
left-to-right. 
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Declarations 


declaration: 

decl-specifiers init-declarator-listop t ; 
decl-specifiers: 

type-specifier decl-specifiers opt 
sc-specifier decl-specifiers opt 


sc-specifier: 

auto 

static 

elxsi 

extern 

register 

typedef 



type-specifier: 

char 

unsigned char 
short 

unsigned short 

int 

long 

long long 

unsigned 

float 

double 

void 

struct-or-un ion-specifier 
typedef-name 


init-declarator-list: 

init-declarator 

init-declarator, init-declarator-list 


init-declarator: 
declarator initial izer opt 

declarator: 
identifier 
( declarator ) 

* declarator 
declarator ( ) 

declarator [ constant-exp ression opt ] 
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Declarations 


struct-or-union-specifier: 
struct { struct-decl-list } 
struct identifier { struct-decl-list} 
struct identifier 
union { struct-decl-list } 
union identifier { struct-decl-list} 
union identifier 

struct-decl-list: 
struct-declaration 
struct-declaration, struct-decl-list 

struct-declaration: 
type-specifier struct-declarator-list ; 

struct-declarator-list: 

struct-declarator 

struct-declarator , struct-declarator-list 

struct-declarator: 

declarator 

declarator : constant-expression 
: constant-expression 

initializer: 

= expression 
= { initializer-list} 

= { initializer-list,} 

initializer-list: 

expression 

initializer-list, initializer-list 
{ initializer-list} 

type-name: 

type-specifier abstract-declarator 

abstract-declarator: 

empty 

( abstract-declarator ) 

* abstract-declarator 
abstract-declarator ( ) 

abstract-declarator [ constant-expression opt ] 

typedef-name: 

identifier 
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Statements 



compound-statement: 

{ declaration-1 isto pt statement-! ist opt } 


declaration-list: 

declaration 

declaration declaration-list 

statement- list: 
statement 

statement statement-list 
statement: 

compound-statement 
expression ; 

if ( expression ) statement 
if ( expression ) statement else statement 
while ( expression ) statement 
do statement while ( expression ) ; 
for ( express ion 1 opt ; expression 2 opt ; expression 3 opt ) 
statement 

switch ( expression ) statement 

case constant-expression : statement 

default : statement 

break ; 

continue; 

return ; 

return expression ; 
goto identifier ; 
identifier : statement 
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External Definitions 



program: 

external-definition 
external-definition program 


external-definition: 

function-definition 

data-definition 

function-definition: 

type-specifier opt 

function-declarator 

function-body 

function-declarator 
declarator ( parameter-list^ ) 

parameter-list: 

identifier 

identifer, parameter- list 
function-body: 

type-decl-list function-statement 

function-statement: 

{ declaration-1 isto pt statement- list } 

data-definition: 

extern opt type-specifier op ^ init-declarator-l ist^ ; 
static opt type-spec if ier opt init-declarator-listo^ ; 
#define identifier token-string 
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Preprocessor 



#define identifier ( identifier , ... , identifier ) token-string 
#undef identifier 
#include "filename" 

#include <filename> 

#if constant-expression 
#ifdef identifier 
#ifndef identifier 
#else 
#endif 

#line constant identifier 
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ASCII 

Character 

Conversion 

Table 



Conventions Used in this Section 


The following table represents the ASCII character set. At 
the top of the table are the high nibble digits (hexadecimal 
00 through 70 and decimal 0 through 1 1 2), and at the left of 
the table are the low nibble digits (hexadecimal 00 through 
OF and decimal 0 through 1 5). 

To determine the hexadecimal value of an ASCII character, 
add the hexadecimal digit corresponding to the high nibble 
to the hexadecimal digit corresponding to the low nibble of 
the character. For example, the hexadecimal value of the 
asterisk (*) is 20 plus 0A which equals 2A. 

To determine the decimal value of an ASCII character, add 
the decimal digit that corresponds to the high nibble to the 
decimal digit that corresponds to the low nibble of the char- 
acter. For example, the decimal value of the asterisk (*) is 
32 plus 1 0 which equals 42. 




ASCII Character Set 



0 

1 

2 

3 

4 

5 

6 

7 

00 

NUL 

DLE 

SP 

0 

@ 

P 


P 

01 

SOH 

DC1 

| 

1 

A 

Q 

a 

q 

02 

STX 

DC2 

= 

2 

B 

R 

b 

r 

03 

ETX 

DC3 

A 

3 

C 

S 

c 

s 

04 

EOT 

DC4 

$ 

4 

D 

T 

d 

t 

05 

ENQ 

NAK 

% 

5 

E 

U 

e 

u 

06 

ACK 

SYN 

& 

6 

F 

V 

f 

V 

07 

BEL 

ETB 

' 

7 

G 

w 

g 

w 

08 

BS 

CAN 

( 

8 

H 

X 

h 

X 

09 

HT 

EM 

) 

9 

1 

Y 

i 

y 

0A 

LF 

SUB 

* 


J 

z 

j 

z 

0B 

VT 

ESC 

+ 

/ 

K 

[ 

k 

{ 

OC 

FF 

FS 

, 

< 

L 

\ 

1 

1 

0D 

CR 

GS 

- 

= 

M 

] 

m 

} 

0E 

SO 

RS 


> 

N 

A 

n 

- 

OF 

SI 

US 

/ 

? 

O 


o 

DEL 


NUL Null 

SOH Start of heading 
STX Start of text 
ETX End of text 
EOT End of transmission 
ENQ Enquiry 
ACK Acknowledge 
BEL Bell 
BS Backspace 
HT Horizontal tabulation 
LF Linefeed 
VT Vertical tab 
FF Form feed 
CR Carriage return 

50 Shift out 

51 Shift in 
SP Space 


DLE Data link escape 
DC1 Device control 1 
DC2 Device control 2 
DC3 Device control 3 
DC4 Device control 4 
NAK Negative acknowledge 
SYN Synchronous idle 
ETB End of transmission block 
CAN Cancel 
EM End of medium 
SUB Substitute 
ESC Escape 
FS File separator 
GS Group separator 
RS Record separator 
US Unit separator 
DEL Delete 


ASCII - 1 






